diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-08-08 03:02:35 +0300 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2006-08-08 03:55:13 +0000 |
commit | 666ea1927d03c6430ac8120e8603244e721e20a0 (patch) | |
tree | 825978bf91e0470887834b60aeb5ca5815ec39ed /dump.c | |
parent | 0ec9ad96b741d60d5dad460acf757c031b11fe15 (diff) | |
download | perl-666ea1927d03c6430ac8120e8603244e721e20a0.tar.gz |
g++ stage 1 reached
Message-ID: <44D7AA6B.4040802@iki.fi>
p4raw-id: //depot/perl@28674
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, (const char *)(seq ? "%"UVf"\n" : "(%"UVf")\n"), - sequence_num(o->op_next)); + PerlIO_printf(file, seq ? "%"UVf"\n" : "(%"UVf")\n", + sequence_num(o->op_next)); else PerlIO_printf(file, "DONE\n"); if (o->op_targ) { |