perl 5.003_05: t/op/inc.t util.c

[p5sagit/p5-mst-13.2.git] / t / op / inc.t

diff --git a/t/op/inc.t b/t/op/inc.t
index aee91f7..e5a2a92 100755 (executable)
--- a/t/op/inc.t
+++ b/t/op/inc.t
@@ -6,11 +6,11 @@
 print "1..6\n";
 
 # Verify that addition/subtraction properly upgrade to doubles.
-# These tests are only useful on machines with 32 bit longs,
-# and one's complement negation, but shouldn't fail anywhere.
+# These tests are only significant on machines with 32 bit longs,
+# and two's complement negation, but shouldn't fail anywhere.
 
 $a = 2147483647;
-$a++;
+$c=$a++;
 if ($a == 2147483648) 
        {print "ok 1\n"}
 else