diff options
| author | Robin Barker <RMBarker@cpan.org> | 2001-09-10 19:58:01 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-10 22:37:14 +0000 |
| commit | 55140b7900b214ce61d6c3e08927a21f01997d6c (patch) | |
| tree | 06a2447e2cab35841909985adc39531aa53bca5e /op.c | |
| parent | 2aa0348e831318a7132271897c54636ff36e9c33 (diff) | |
| download | perl-55140b7900b214ce61d6c3e08927a21f01997d6c.tar.gz | |
Re: perl@11978
Message-Id: <200109101758.SAA07670@tempest.npl.co.uk>
Format errors.
p4raw-id: //depot/perl@11983
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1431,7 +1431,7 @@ Perl_mod(pTHX_ OP *o, I32 type) if (kid->op_type != OP_NULL || kid->op_targ != OP_LIST) Perl_croak(aTHX_ "panic: unexpected lvalue entersub " - "args: type/targ %ld:%ld", + "args: type/targ %ld:%"UVuf, (long)kid->op_type,kid->op_targ); kid = kLISTOP->op_first; skip_kids: @@ -1462,7 +1462,7 @@ Perl_mod(pTHX_ OP *o, I32 type) if (kid->op_type != OP_RV2CV) Perl_croak(aTHX_ "panic: unexpected lvalue entersub " - "entry via type/targ %ld:%ld", + "entry via type/targ %ld:%"UVuf, (long)kid->op_type,kid->op_targ); kid->op_private |= OPpLVAL_INTRO; break; /* Postpone until runtime */ @@ -1475,7 +1475,7 @@ Perl_mod(pTHX_ OP *o, I32 type) if (kid->op_type == OP_NULL) Perl_croak(aTHX_ "Unexpected constant lvalue entersub " - "entry via type/targ %ld:%ld", + "entry via type/targ %ld:%"UVuf, (long)kid->op_type,kid->op_targ); if (kid->op_type != OP_GV) { /* Restore RV2CV to check lvalueness */ |