diff options
author | Robin Barker <RMBarker@cpan.org> | 2005-04-12 19:53:32 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-04-13 08:25:43 +0000 |
commit | e45843364c6c14961f5f9e7f270e051a7c0891dc (patch) | |
tree | 0316baca9c377f81ce1a2f12d3d9674cb1c0f056 /perly.c | |
parent | 76ca89edebb126a10dcdc3521c9db0680eba1b5c (diff) | |
download | perl-e45843364c6c14961f5f9e7f270e051a7c0891dc.tar.gz |
-Wformat
Message-ID: <533D273D4014D411AB1D00062938C4D90849C634@hotel.npl.co.uk>
p4raw-id: //depot/perl@24233
Diffstat (limited to 'perly.c')
-rw-r--r-- | perly.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -119,7 +119,7 @@ yysymprint (pTHX_ PerlIO *yyoutput, int yytype, YYSTYPE *yyvaluep) # ifdef YYPRINT YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); # else - YYFPRINTF (yyoutput, "0x%x", yyvaluep->ival); + YYFPRINTF (yyoutput, "0x%"UVxf, (UV)yyvaluep->ival); # endif } else @@ -160,7 +160,7 @@ yy_stack_print (pTHX_ short *yyss, short *yyssp, YYSTYPE *yyvs, const char**yyns PerlIO_printf(Perl_debug_log, " %8.8s", *yyns); PerlIO_printf(Perl_debug_log, "\nvalue:"); for (i=0, yyvs += start; i < count; i++, yyvs++) - PerlIO_printf(Perl_debug_log, " %8x", yyvs->ival); + PerlIO_printf(Perl_debug_log, " %8"UVxf, (UV)yyvs->ival); PerlIO_printf(Perl_debug_log, "\n\n"); } |