diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-23 21:47:49 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-23 21:47:49 +0000 |
| commit | b900a5214ea580557fb7c41bb3b529d90bad25a3 (patch) | |
| tree | 938bd01cc3111259f4c4a073b1647bd546a4603b /ext/Data | |
| parent | 31582a29107eeb803e2d1134e77b201068578e21 (diff) | |
| download | perl-b900a5214ea580557fb7c41bb3b529d90bad25a3.tar.gz | |
More printf-fixes (see also #4426).
p4raw-id: //depot/cfgperl@4429
Diffstat (limited to 'ext/Data')
| -rw-r--r-- | ext/Data/Dumper/Dumper.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/Data/Dumper/Dumper.xs b/ext/Data/Dumper/Dumper.xs index 886c317ea0..6f548bbaa7 100644 --- a/ext/Data/Dumper/Dumper.xs +++ b/ext/Data/Dumper/Dumper.xs @@ -585,7 +585,7 @@ DD_dump(pTHX_ SV *val, char *name, STRLEN namelen, SV *retval, HV *seenhv, if (SvIOK(val)) { STRLEN len; i = SvIV(val); - (void) sprintf(tmpbuf, "%d", i); + (void) sprintf(tmpbuf, "%"IVdf, (IV)i); len = strlen(tmpbuf); sv_catpvn(retval, tmpbuf, len); } @@ -839,7 +839,7 @@ Data_Dumper_Dumpxs(href, ...) STRLEN nchars = 0; sv_setpvn(name, "$", 1); sv_catsv(name, varname); - (void) sprintf(tmpbuf, "%"IVdf, (IV)i+1); + (void) sprintf(tmpbuf, "%d", i+1); nchars = strlen(tmpbuf); sv_catpvn(name, tmpbuf, nchars); } |