Function Check-For-Surprises

Part of:

package lift
( check-for-surprises < testsuite > )