summaryrefslogtreecommitdiff
path: root/t/op
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-02-22 19:40:43 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-02-22 19:40:43 +0000
commit44d27a6e4dd2f43427369f61e83839b838b643ae (patch)
tree6917f3d47c9ce621ceb203dcd9a3f9088690bbed /t/op
parentdd101d755db106008f0a83c18ff0bfc7eb6bbdde (diff)
downloadperl-44d27a6e4dd2f43427369f61e83839b838b643ae.tar.gz
The subtests 28 and 31 were wrong. Tightened also the similar
tests nearby. p4raw-id: //depot/cfgperl@5209
Diffstat (limited to 't/op')
-rw-r--r--t/op/64bit.t10
1 files changed, 5 insertions, 5 deletions
diff --git a/t/op/64bit.t b/t/op/64bit.t
index 09419f8790..f7103af73e 100644
--- a/t/op/64bit.t
+++ b/t/op/64bit.t
@@ -145,27 +145,27 @@ print "ok 26\n";
$a = 9223372036854775807;
$c = ++$a;
-print "not " unless $a == 9223372036854775808;
+print "not " unless $a == 9223372036854775808 && $c == $a;
print "ok 27\n";
$a = 9223372036854775807;
$c = $a + 1;
-print "not " unless $a == 9223372036854775808;
+print "not " unless $a == 9223372036854775807 && $c == 9223372036854775808;
print "ok 28\n";
$a = -9223372036854775808;
$c = $a--;
-print "not " unless $a == -9223372036854775809;
+print "not " unless $a == -9223372036854775809 && $c == -9223372036854775808;
print "ok 29\n";
$a = -9223372036854775808;
$c = --$a;
-print "not " unless $a == -9223372036854775809;
+print "not " unless $a == -9223372036854775809 && $c == $a;
print "ok 30\n";
$a = -9223372036854775808;
$c = $a - 1;
-print "not " unless $a == -9223372036854775809;
+print "not " unless $a == -9223372036854775808 && $c == -9223372036854775809;
print "ok 31\n";