--- t/base/num.t.orig 2007-04-24 00:47:20.000000000 +0200 +++ t/base/num.t 2007-04-24 00:47:33.000000000 +0200 @@ -166,7 +166,7 @@ $a = 1e34; "$a"; unless ($^O eq 'posix-bc') -{ print $a eq "1e+34" || $a eq "1e+034" ? "ok 45\n" : "not ok 45 $a\n"; } +{ print $a eq "1e+34" || $a eq "1e+034" ? "ok 45\n" : "not ok 45 # $a\n"; } else { print "ok 45 # skipped on $^O\n"; }Thread Next