Change 11902 by jhi@alpha on 2001/09/05 23:27:57

        In UNICOS division yada yada.

Affected files ...

... //depot/perl/t/op/override.t#2 edit

Differences ...

==== //depot/perl/t/op/override.t#2 (xtext) ====
Index: perl/t/op/override.t
--- perl/t/op/override.t.~1~    Wed Sep  5 17:45:05 2001
+++ perl/t/op/override.t        Wed Sep  5 17:45:05 2001
@@ -47,7 +47,7 @@
 print "ok 6\n";
 
 require v5.6;
-print "not " unless $r == 5.006 && $r eq "\x05\x06";
+print "not " unless abs($r - 5.006) < 0.001 && $r eq "\x05\x06";
 print "ok 7\n";
 
 eval "use Foo";
End of Patch.

Reply via email to