summaryrefslogtreecommitdiff
path: root/pad.c
diff options
context:
space:
mode:
authorRobin Barker <RMBarker@cpan.org>2004-03-17 18:37:10 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2004-03-17 19:13:03 +0000
commitc0fd1b4283835f2ec7b48824dd974b16677cdf78 (patch)
treea89289222cc935daa5548c20862a2ab942328de7 /pad.c
parentb9d46b3942a9a8cce9cbca1e08f61ac23083a740 (diff)
downloadperl-c0fd1b4283835f2ec7b48824dd974b16677cdf78.tar.gz
format/casting/warning RE: perl 5.9.1
Message-ID: <533D273D4014D411AB1D00062938C4D90404682E@hotel.npl.co.uk> p4raw-id: //depot/perl@22521
Diffstat (limited to 'pad.c')
-rw-r--r--pad.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pad.c b/pad.c
index 5c8ce1aa3c..209eb0a71b 100644
--- a/pad.c
+++ b/pad.c
@@ -1260,7 +1260,7 @@ Perl_do_dump_pad(pTHX_ I32 level, PerlIO *file, PADLIST *padlist, int full)
if (namesv) {
if (SvFAKE(namesv))
Perl_dump_indent(aTHX_ level+1, file,
- "%2d. 0x%"UVxf"<%lu> FAKE \"%s\" flags=0x%x index=%lu\n",
+ "%2d. 0x%"UVxf"<%lu> FAKE \"%s\" flags=0x%lx index=%lu\n",
(int) ix,
PTR2UV(ppad[ix]),
(unsigned long) (ppad[ix] ? SvREFCNT(ppad[ix]) : 0),