diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-07 09:41:23 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-07 09:41:23 +0000 |
| commit | 22f3ae8cbf6c65afe1b66665ab51a244fa3a6869 (patch) | |
| tree | 69306625787572dbed0783f783430de5a15fc336 /pp_sys.c | |
| parent | 716026f96c8d48603497e3610163f08d8c9aeae6 (diff) | |
| download | perl-22f3ae8cbf6c65afe1b66665ab51a244fa3a6869.tar.gz | |
Fix a printf thinko: now quads must have the ll L q prefix.
(in other words, a bare %d is an int/unsigned)
p4raw-id: //depot/cfgperl@4097
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -3946,11 +3946,11 @@ PP(pp_gmtime) tsv = Perl_newSVpvf(aTHX_ "%s %s %2d %02d:%02d:%02d %d", dayname[tmbuf->tm_wday], monname[tmbuf->tm_mon], - (IV)tmbuf->tm_mday, - (IV)tmbuf->tm_hour, - (IV)tmbuf->tm_min, - (IV)tmbuf->tm_sec, - (IV)tmbuf->tm_year + 1900); + tmbuf->tm_mday, + tmbuf->tm_hour, + tmbuf->tm_min, + tmbuf->tm_sec, + tmbuf->tm_year + 1900); PUSHs(sv_2mortal(tsv)); } else if (tmbuf) { |