summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorJames E Keenan <jkeenan@cpan.org>2012-12-25 21:35:25 -0500
committerJames E Keenan <jkeenan@cpan.org>2013-01-05 14:08:04 -0500
commit9c5f535f1298daba31bc51092d3a35c9ba36ae90 (patch)
treeb188bdefabf1d27d178f024db879338e719c6319 /t
parentbdb377283424a105324c62ff1d2774691d947478 (diff)
downloadperl-9c5f535f1298daba31bc51092d3a35c9ba36ae90.tar.gz
t/op/pow.t: Add descriptions for tests lacking them.
Those which were still lacking descriptions were all testing that exponentiation has precedence over negation.
Diffstat (limited to 't')
-rw-r--r--t/op/pow.t10
1 files changed, 5 insertions, 5 deletions
diff --git a/t/op/pow.t b/t/op/pow.t
index c6a7ad6385..4cfeed1e63 100644
--- a/t/op/pow.t
+++ b/t/op/pow.t
@@ -37,11 +37,11 @@ is(3**1, 3, "positive ** 1 = self");
is(3**2, 9, "positive ** 2 = positive");
is(3**3, 27, "(positive int) ** (odd power) is positive");
-# And test order of operations while we're at it
-is(-3**0, -1);
-is(-3**1, -3);
-is(-3**2, -9);
-is(-3**3, -27);
+# And test order of operations while we are at it
+is(-3**0, -1, "positive ** 0, then negated, = -1");
+is(-3**1, -3, "positive ** 1, then negated, = negative of self");
+is(-3**2, -9, "positive ** 2, then negated, = negative of square");
+is(-3**3, -27, "(positive int) ** (odd power), then negated, is negative");
# Ought to be 32, 64, 36 or something like that.