unmemoize.t revision 7c478bd95313f5f23a4c958a745db2134aa03244
use lib '..';
print "1..5\n";
print (($@ ? '' : 'not '), "ok 1\n");
{ my $I = 0;
sub u { $I++ }
}
print ($@ ? "not ok 3\n" : "ok 3\n");
print ($@ ? "ok 5\n" : "not ok 5\n");