X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=dump.c;h=3dd9b0e2e1dbea2f5c9cefc3ccfb7edd76fe7cf0;hb=c44d3fdb45c0c48dcd8af6dc9f4a4166137bf839;hp=569dc8c923bd0a70c777d44072f3fa6de8ced30e;hpb=3818b22bb9ef820a2553aa5e3504220f3b156f21;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/dump.c b/dump.c
index 569dc8c..3dd9b0e 100644
--- 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;