diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-11-26 16:06:53 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-11-26 16:57:12 -0700 |
commit | 33f29a4cec504672835fd47a5b11657983d0209e (patch) | |
tree | a5dbc40ad20df3c43ca2b542bc33a6061d68559e /sv.c | |
parent | 06099f79acc9684bcbd2efbb1efe56ce80c65f08 (diff) | |
download | perl-33f29a4cec504672835fd47a5b11657983d0209e.tar.gz |
Remove 3 unused interpreter variables
These variables have been unused in the Perl core since
commit 4c88d5e0740d796bf5064336d280bba72897f385.
The variables are undocumented. The only real use of any of these I
found in CPAN is at
https://metacpan.org/source/ABERGMAN/Devel-GC-Helper-0.25/Helper.xs#L1
The uses there appear to be in a list of known Perl variables. Since
the module was published, more than a few new variables have been added,
making this code obsolete anyway.
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 3 |
1 files changed, 0 insertions, 3 deletions
@@ -13432,15 +13432,12 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags, /* utf8 character class swashes */ PL_utf8_alnum = sv_dup_inc(proto_perl->Iutf8_alnum, param); PL_utf8_alpha = sv_dup_inc(proto_perl->Iutf8_alpha, param); - PL_utf8_blank = sv_dup_inc(proto_perl->Iutf8_blank, param); - PL_utf8_space = sv_dup_inc(proto_perl->Iutf8_space, param); PL_utf8_graph = sv_dup_inc(proto_perl->Iutf8_graph, param); PL_utf8_digit = sv_dup_inc(proto_perl->Iutf8_digit, param); PL_utf8_upper = sv_dup_inc(proto_perl->Iutf8_upper, param); PL_utf8_lower = sv_dup_inc(proto_perl->Iutf8_lower, param); PL_utf8_print = sv_dup_inc(proto_perl->Iutf8_print, param); PL_utf8_punct = sv_dup_inc(proto_perl->Iutf8_punct, param); - PL_utf8_xdigit = sv_dup_inc(proto_perl->Iutf8_xdigit, param); PL_utf8_mark = sv_dup_inc(proto_perl->Iutf8_mark, param); PL_utf8_X_regular_begin = sv_dup_inc(proto_perl->Iutf8_X_regular_begin, param); PL_utf8_X_extend = sv_dup_inc(proto_perl->Iutf8_X_extend, param); |