op_dump() tweak
Gurusamy Sarathy [Thu, 17 Feb 2000 17:55:18 +0000 (17:55 +0000)]
p4raw-id: //depot/perl@5121

dump.c

diff --git a/dump.c b/dump.c
index 569dc8c..3dd9b0e 100644 (file)
--- a/dump.c
+++ b/dump.c
@@ -533,8 +533,6 @@ Perl_do_op_dump(pTHX_ I32 level, PerlIO *file, OP *o)
 #endif
        break;
     case OP_CONST:
-       Perl_dump_indent(aTHX_ level, file, "SV = %s\n", SvPEEK(cSVOPo_sv));
-       break;
     case OP_METHOD_NAMED:
        Perl_dump_indent(aTHX_ level, file, "SV = %s\n", SvPEEK(cSVOPo->op_sv));
        break;