Why should -3**$x be more precisely determined than 3**$x?

p4raw-id: //depot/perl@21419

diff --git a/t/op/pow.t b/t/op/pow.t
index 9dd7780..4e89d22 100644 (file)
--- a/t/op/pow.t
+++ b/t/op/pow.t
@@ -17,7 +17,7 @@ my @pow = ([3,30,1e-14],
            [5,20,1e-14],
            [2.5, 10,,1e-14],
            [-2, 69,0],
-           [-3, 30,0],
+           [-3, 30, 1e-14],
 );
 my $tests;
 $tests += $_->[1] foreach @pow;