diff options
| author | Robin Barker <RMBarker@cpan.org> | 2006-09-01 17:10:25 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-09-05 10:40:25 +0000 |
| commit | f5992bc4a0a918eda67e6097aac8bd75a3b524e4 (patch) | |
| tree | 26f5c02dc9031a2719076673e74cba5ac0173c56 /pp_pack.c | |
| parent | 786e8c118e1218e4c348fecf469934e080881633 (diff) | |
| download | perl-f5992bc4a0a918eda67e6097aac8bd75a3b524e4.tar.gz | |
; was RE: [PATCH perlio.c pp.c regcomp.c] silence format and comparison warnings
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <2C2E01334A940D4792B3E115F95B7226120A21@exchsvr1.npl.ad.local>
p4raw-id: //depot/perl@28786
Diffstat (limited to 'pp_pack.c')
| -rw-r--r-- | pp_pack.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1971,7 +1971,7 @@ S_unpack_rec(pTHX_ tempsym_t* symptr, const char *s, const char *strbeg, const c if (++bytes >= sizeof(UV)) { /* promote to string */ const char *t; - sv = Perl_newSVpvf(aTHX_ "%.*"UVf, (int)TYPE_DIGITS(UV), auv); + sv = Perl_newSVpvf(aTHX_ "%.*"UVuf, (int)TYPE_DIGITS(UV), auv); while (s < strend) { ch = SHIFT_BYTE(utf8, s, strend, datumtype); sv = mul128(sv, (U8)(ch & 0x7f)); |