Typo fix.
Abigail [Tue, 24 Apr 2007 00:48:26 +0000 (02:48 +0200)]
Message-ID: <20070423224826.GC544@abigail.nl>

p4raw-id: //depot/perl@31048

t/base/num.t

index ffad5d5..06eea52 100644 (file)
@@ -164,7 +164,7 @@ print $a eq "123.456" ? "ok 44\n" : "not ok 44 # $a\n";
 
 $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"; }