diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-07-20 20:12:54 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-07-20 20:12:54 +0000 |
commit | 2b84528b3b38853e791751a3bd2b6b8990027ef2 (patch) | |
tree | 22fd1375e89b6c124087aea2af33da0dcf3a620f /t/lib | |
parent | a783c5f421048120dc022238eeb6eb8a62d130d0 (diff) | |
download | perl-2b84528b3b38853e791751a3bd2b6b8990027ef2.tar.gz |
The warning "Possible precedence problem on bitwise operator"
was incorrectly produced with the bitwise-assignment operators.
Fix it. (bug #23065 concerning 5.8.1 RC2)
p4raw-id: //depot/perl@20171
Diffstat (limited to 't/lib')
-rw-r--r-- | t/lib/warnings/op | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/lib/warnings/op b/t/lib/warnings/op index 58056a6ce5..35779a9f5a 100644 --- a/t/lib/warnings/op +++ b/t/lib/warnings/op @@ -909,6 +909,7 @@ $a = $b < $c & $d; $a = $b >= $c ^ $d; $a = $b <= $c | $d; $a = $b <=> $c & $d; +$a &= $b == $c; $a |= $b == $c; $a ^= $b == $c; # shouldn't warn no warnings 'precedence'; $a = $b & $c == $d; $a = $b ^ $c != $d; |