summaryrefslogtreecommitdiff
path: root/dump.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-08-05 00:34:11 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-08-05 13:18:57 -0700
commitdea823b3f7c22fea989211dbe1bed7a34d49e39a (patch)
treef4d231d35c28a9588a2ecdf6c3afc4614dc51048 /dump.c
parentf2da823f484d421a6bb57e32e442b19b553f4b35 (diff)
downloadperl-dea823b3f7c22fea989211dbe1bed7a34d49e39a.tar.gz
Disallow setting SvPV on formats
Setting a the PV on a format is meaningless, as of the previ- ous commit. This frees up SvCUR for other uses.
Diffstat (limited to 'dump.c')
-rw-r--r--dump.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/dump.c b/dump.c
index c7a40a6949..ca5d12584c 100644
--- a/dump.c
+++ b/dump.c
@@ -1609,7 +1609,7 @@ Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bo
return;
}
- if ((type <= SVt_PVLV && !isGV_with_GP(sv)) || type == SVt_PVFM) {
+ if (type <= SVt_PVLV && !isGV_with_GP(sv)) {
if (SvPVX_const(sv)) {
STRLEN delta;
if (SvOOK(sv)) {