diff options
| author | Adrian M. Enache <enache@rdslink.ro> | 2003-08-02 04:50:40 +0300 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-02 05:37:37 +0000 |
| commit | 19a5c5129806e3fc5fc1a31e8f8f3ce298848b83 (patch) | |
| tree | 7e2a093de50e9966b4fd7e51946fe2522ccae61c /pad.c | |
| parent | 19bcb543e1f5bb004bdf7d16ba95ef96ce9e99c8 (diff) | |
| download | perl-19a5c5129806e3fc5fc1a31e8f8f3ce298848b83.tar.gz | |
Small nit to pad.c
Message-ID: <20030801225040.GB1281@ratsnest.hole>
p4raw-id: //depot/perl@20441
Diffstat (limited to 'pad.c')
| -rw-r--r-- | pad.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -664,7 +664,7 @@ S_pad_findlex(pTHX_ char *name, CV* cv, U32 seq, int warn, *out_name_sv = name_svp[offset]; /* return the namesv */ *out_flags = SvIVX(*out_name_sv); DEBUG_Xv(PerlIO_printf(Perl_debug_log, - "Pad findlex cv=0x%"UVxf" matched: offset=%ld flags=0x%x index=%lu\n", + "Pad findlex cv=0x%"UVxf" matched: offset=%ld flags=0x%lx index=%lu\n", PTR2UV(cv), (long)offset, (unsigned long)*out_flags, (unsigned long)SvNVX(*out_name_sv) )); @@ -720,7 +720,7 @@ S_pad_findlex(pTHX_ char *name, CV* cv, U32 seq, int warn, CvDEPTH(cv) ? CvDEPTH(cv) : 1])[offset]; DEBUG_Xv(PerlIO_printf(Perl_debug_log, "Pad findlex cv=0x%"UVxf" found lex=0x%"UVxf"\n", - PTR2UV(cv), *out_capture)); + PTR2UV(cv), PTR2UV(*out_capture))); if (SvPADSTALE(*out_capture)) { if (ckWARN(WARN_CLOSURE)) |