diff options
author | Enache Adrian <enache@rdslink.ro> | 2003-07-05 22:08:07 +0300 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2012-09-20 11:18:02 +0200 |
commit | cec4dc0e420ef6e3b19b0e6f661d2b4fa43b93fa (patch) | |
tree | 99d3cee00fd3b2ca7edc3341a29385b1946c5c4f /sv.c | |
parent | 5f7e30c4a6075995b75f8d337d2b381e5463bce3 (diff) | |
download | perl-cec4dc0e420ef6e3b19b0e6f661d2b4fa43b93fa.tar.gz |
Get rid of PL_formfeed.
$^L is neither a magical variable, nor a normal one (like $;) but
it's just a little bit special :)
This patch removes PL_formfeed - IMHO, an extra gv_fetchpv per page
when using formats isn't going to cause a sensible speed regression.
I suppose that removing the intrpvar.h hunk from the patch is enough
to keep binary compatibility - unless someone used PL_formfeed from
an XS module.
[with regen.pl run as noted by the author, and an additional change to
perl.c to remove the reference to PL_formfeed added soon after this patch
was sent]
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -13161,7 +13161,6 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags, PL_e_script = sv_dup_inc(proto_perl->Ie_script, param); /* magical thingies */ - PL_formfeed = sv_dup(proto_perl->Iformfeed, param); PL_encoding = sv_dup(proto_perl->Iencoding, param); |