diff options
| author | Slaven Rezic <slaven@rezic.de> | 2002-11-18 12:09:51 +0100 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-11-25 02:37:07 +0000 |
| commit | 6bf47b083ef4085da3ab3288ed9331208cbe862c (patch) | |
| tree | cca79781ce7a669658bcdd748f34677bcf84bec4 /dump.c | |
| parent | 9d7f88ddd9ec1f324b7625b5481fe9d2002a2554 (diff) | |
| download | perl-6bf47b083ef4085da3ab3288ed9331208cbe862c.tar.gz | |
add support for STASH and MAGIC information for REFs to sv_dump().
Subject: [PATCH]
Message-Id: <200211181009.gAIA9pFG034877@vran.herceg.de>
p4raw-id: //depot/perl@18177
Diffstat (limited to 'dump.c')
| -rw-r--r-- | dump.c | 2 |
1 files changed, 0 insertions, 2 deletions
@@ -1118,8 +1118,6 @@ Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bo Perl_dump_indent(aTHX_ level, file, " RV = 0x%"UVxf"\n", PTR2UV(SvRV(sv))); if (nest < maxnest) do_sv_dump(level+1, file, SvRV(sv), nest+1, maxnest, dumpops, pvlim); - SvREFCNT_dec(d); - return; } if (type < SVt_PV) { SvREFCNT_dec(d); |