diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-08-04 11:58:27 +0300 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-08-07 08:15:39 +0000 |
| commit | 10edeb5d2457364a70a6848a864cfa6b89dfc882 (patch) | |
| tree | 901034210efd6983fe16b782168144371eb95631 /dump.c | |
| parent | 435fbc73c32c7bd8a6a0cdb8a1ea0ca077918585 (diff) | |
| download | perl-10edeb5d2457364a70a6848a864cfa6b89dfc882.tar.gz | |
g++ large patch
Message-ID: <44D2E203.5050201@iki.fi>
p4raw-id: //depot/perl@28662
Diffstat (limited to 'dump.c')
| -rw-r--r-- | dump.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -718,8 +718,8 @@ Perl_do_op_dump(pTHX_ I32 level, PerlIO *file, const OP *o) "%*sTYPE = %s ===> ", (int)(PL_dumpindent*level-4), "", OP_NAME(o)); if (o->op_next) - PerlIO_printf(file, seq ? "%"UVf"\n" : "(%"UVf")\n", - sequence_num(o->op_next)); + PerlIO_printf(file, (const char *)(seq ? "%"UVf"\n" : "(%"UVf")\n"), + sequence_num(o->op_next)); else PerlIO_printf(file, "DONE\n"); if (o->op_targ) { |