diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-24 10:35:15 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-24 10:35:15 +0000 |
| commit | 58bde88d59b50dfafcac03e2948c42887eb15e97 (patch) | |
| tree | 99d781978b2dd36df4199fc8a55acf94ba4f2505 /op.c | |
| parent | b7c442934df5578585948a9249cd388c152963f7 (diff) | |
| download | perl-58bde88d59b50dfafcac03e2948c42887eb15e97.tar.gz | |
Fix potential precedence problem
p4raw-id: //depot/perl@31052
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1300,7 +1300,7 @@ Perl_mod(pTHX_ OP *o, I32 type) Perl_croak(aTHX_ "That use of $[ is unsupported"); break; case OP_STUB: - if (o->op_flags & OPf_PARENS || PL_madskills) + if ((o->op_flags & OPf_PARENS) || PL_madskills) break; goto nomod; case OP_ENTERSUB: |