diff options
| author | Andy Lester <andy@petdance.com> | 2006-03-13 03:31:52 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-03-14 08:35:24 +0000 |
| commit | ef519e132d81262cbafdc318e417dce9db1d88a9 (patch) | |
| tree | a86a0128b208190f32eabd4f54afd7c027e6a239 /op.c | |
| parent | 1d230ada0b2ff8ef3af3370141f10c3315abf450 (diff) | |
| download | perl-ef519e132d81262cbafdc318e417dce9db1d88a9.tar.gz | |
looks_like_bool can be const
Message-ID: <20060313153152.GA13254@petdance.com>
p4raw-id: //depot/perl@27492
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -4607,7 +4607,7 @@ S_newGIVWHENOP(pTHX_ OP *cond, OP *block, */ STATIC bool -S_looks_like_bool(pTHX_ OP *o) +S_looks_like_bool(pTHX_ const OP *o) { dVAR; switch(o->op_type) { @@ -4678,7 +4678,7 @@ Perl_newGIVENOP(pTHX_ OP *cond, OP *block, PADOFFSET defsv_off) OP * Perl_newWHENOP(pTHX_ OP *cond, OP *block) { - bool cond_llb = (!cond || looks_like_bool(cond)); + const bool cond_llb = (!cond || looks_like_bool(cond)); OP *cond_op; if (cond_llb) |