X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=run.c;h=1b1e72b1a6c0e1775178cfd9b43a3b732f7be08f;hb=5ca69f12fe2141395f51c7675a4c54f19c907231;hp=a4d3ea0e5ceee0c7ff42539176f78658bef7f28a;hpb=d6179d6f73c0b13107fbcf65d20105cdfbc30dbc;p=p5sagit%2Fp5-mst-13.2.git diff --git a/run.c b/run.c index a4d3ea0..1b1e72b 100644 --- a/run.c +++ b/run.c @@ -90,7 +90,7 @@ Perl_debop(pTHX_ OP *o) if (svp) PerlIO_printf(Perl_debug_log, "(%s)", SvPV(*svp,n_a)); else - PerlIO_printf(Perl_debug_log, "[%"UVuf"]", o->op_targ); + PerlIO_printf(Perl_debug_log, "[%"UVuf"]", (UV)o->op_targ); break; default: break;