diff options
author | Steve Hay <steve.m.hay@googlemail.com> | 2013-01-14 17:59:55 +0000 |
---|---|---|
committer | Steve Hay <steve.m.hay@googlemail.com> | 2013-01-14 18:00:13 +0000 |
commit | 8f939fab8ea456dff01a2f5c368b664623f9293b (patch) | |
tree | 95cb9bddf86e7d1f974a029689587777f244a62f /cop.h | |
parent | 5e0a247b35271159d629ea8562732e0993ed4594 (diff) | |
download | perl-8f939fab8ea456dff01a2f5c368b664623f9293b.tar.gz |
Silence a couple of warnings
("'initializing' : conversion from 'I32' to 'U8', possible loss of data"
and "formal parameter n different from declaration".)
Diffstat (limited to 'cop.h')
-rw-r--r-- | cop.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -605,7 +605,7 @@ struct block_format { (PL_op->op_flags & OPf_WANT) \ ? OPpENTERSUB_LVAL_MASK \ : !(PL_op->op_private & OPpENTERSUB_LVAL_MASK) \ - ? 0 : Perl_was_lvalue_sub(aTHX); \ + ? 0 : (U8)Perl_was_lvalue_sub(aTHX); \ PUSHSUB_BASE(cx) \ cx->blk_u16 = PL_op->op_private & \ (phlags|OPpDEREF); \ |