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 /intrpvar.h | |
| 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 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/intrpvar.h b/intrpvar.h index 40a6aa1e9d..9817bd29dc 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -301,8 +301,6 @@ PERLVAR(I, e_script, SV *) /* magical thingies */ PERLVAR(I, basetime, Time_t) /* $^T */ -PERLVAR(I, formfeed, SV *) /* $^L */ - PERLVARI(I, maxsysfd, I32, MAXSYSFD) /* top fd to pass to subprocesses */ |