X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fbase%2Fnum.t;h=37ef9fa1ce30a33c377c6d2273d3ebcc2459c053;hb=0aa356c1277870a09fb0a72d88216267eefff4ac;hp=22f96bef42b169e3314c79659e8bdaece2e5d297;hpb=d1eb8299735ff97f5e49efd0313271aeeb84e2c7;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/base/num.t b/t/base/num.t index 22f96be..37ef9fa 100644 --- a/t/base/num.t +++ b/t/base/num.t @@ -151,5 +151,5 @@ print $a eq "-100000" ? "ok 43\n" : "not ok 43 # $a\n"; $a = 123.456; "$a"; print $a eq "123.456" ? "ok 44\n" : "not ok 44 # $a\n"; -$a = 1e30; "$a"; -print $a eq "1e+30" || $a eq "1e+030" ? "ok 45\n" : "not ok 45 $a\n"; +$a = 1e34; "$a"; +print $a eq "1e+34" || $a eq "1e+034" ? "ok 45\n" : "not ok 45 $a\n";