From 6f02a29952bee8a2f755ecdff8223ec5db30a97d Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Fri, 10 Aug 2012 20:24:09 -0700 Subject: [PATCH] Document the last five tests of t/op/lop.t --- t/op/lop.t | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/t/op/lop.t b/t/op/lop.t index c11fd92..1ce8c46 100644 --- a/t/op/lop.t +++ b/t/op/lop.t @@ -40,21 +40,21 @@ for my $i (undef, 0 .. 2, "", "0 but true") { # $test == 6 my $i = 0; (($i ||= 1) &&= 3) += 4; -is( $i, 7 ); +is( $i, 7, '||=, &&='); my ($x, $y) = (1, 8); $i = !$x || $y; -is( $i, 8 ); +is( $i, 8, 'negation precedence with ||' ); ++$y; $i = !$x || !$x || !$x || $y; -is( $i, 9 ); +is( $i, 9, 'negation precedence with ||, multiple operands' ); $x = 0; ++$y; $i = !$x && $y; -is( $i, 10 ); +is( $i, 10, 'negation precedence with &&' ); ++$y; $i = !$x && !$x && !$x && $y; -is( $i, 11 ); +is( $i, 11, 'negation precedence with &&, multiple operands' ); -- 2.7.4