diff options
author | Father Chrysostomos <sprout@cpan.org> | 2012-08-05 00:34:11 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-08-05 13:18:57 -0700 |
commit | dea823b3f7c22fea989211dbe1bed7a34d49e39a (patch) | |
tree | f4d231d35c28a9588a2ecdf6c3afc4614dc51048 /dump.c | |
parent | f2da823f484d421a6bb57e32e442b19b553f4b35 (diff) | |
download | perl-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.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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)) { |