diff options
author | Tony Cook <tony@develop-help.com> | 2011-07-24 14:09:28 +1000 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2011-07-24 14:09:28 +1000 |
commit | 4c760560bb63412cde2368fc9484d5225a99e6a7 (patch) | |
tree | 2d8e0827ca9f0cc3e8a3173a4dd99537d9857365 /pad.c | |
parent | 606d51b7e00905cb4fd0fed6ee20d666006f4f1a (diff) | |
download | perl-4c760560bb63412cde2368fc9484d5225a99e6a7.tar.gz |
use the correct type for a format field width parameter
This was warning in DEBUGGING builds
Diffstat (limited to 'pad.c')
-rw-r--r-- | pad.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1047,7 +1047,7 @@ S_pad_findlex(pTHX_ const char *namepv, STRLEN namelen, U32 flags, const CV* cv, DEBUG_Xv(PerlIO_printf(Perl_debug_log, "Pad findlex cv=0x%"UVxf" searching \"%.*s\" seq=%d%s\n", - PTR2UV(cv), namelen, namepv, (int)seq, + PTR2UV(cv), (int)namelen, namepv, (int)seq, out_capture ? " capturing" : "" )); /* first, search this pad */ |