diff options
author | Dave Mitchell <davem@fdisolutions.com> | 2007-05-20 23:56:30 +0000 |
---|---|---|
committer | Dave Mitchell <davem@fdisolutions.com> | 2007-05-20 23:56:30 +0000 |
commit | 95ca8690fb514421b98da534c91bfd455c9daabc (patch) | |
tree | 9fd8976fcc88e752e6dad70da878d20df9048699 /intrpvar.h | |
parent | 907b3e23950be4dd31c150e1902fbd26201355bd (diff) | |
download | perl-95ca8690fb514421b98da534c91bfd455c9daabc.tar.gz |
delete unused vars PL_av_fetch_sv, PL_hv_fetch_sv
and fix 'duplicate symbol' warnings from embed.pl
for utf8cache and sh_path
p4raw-id: //depot/perl@31246
Diffstat (limited to 'intrpvar.h')
-rw-r--r-- | intrpvar.h | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/intrpvar.h b/intrpvar.h index 0eb9fe29cc..3a171a6acf 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -135,11 +135,8 @@ PERLVAR(Istart_env, JMPENV) /* empty startup sigjmp environment */ PERLVARI(Ierrors, SV *, NULL) /* outstanding queued errors */ /* statics "owned" by various functions */ -PERLVAR(Iav_fetch_sv, SV *) /* unused as of change #19268 */ -PERLVAR(Ihv_fetch_sv, SV *) /* unused as of change #19268 */ PERLVAR(Ihv_fetch_ent_mh, HE*) /* owned by hv_fetch_ent() */ - PERLVAR(Ilastgotoprobe, OP*) /* from pp_ctl.c */ /* sort stuff */ @@ -483,10 +480,13 @@ PERLVARI(Icollation_standard, bool, TRUE) #ifdef PERL_UTF8_CACHE_ASSERT -PERLVARI(Iutf8cache, I8, -1) /* Is the utf8 caching code enabled? */ +# define PERL___I -1 #else -PERLVARI(Iutf8cache, I8, 1) /* Is the utf8 caching code enabled? */ +# define PERL___I -1 #endif +PERLVARI(Iutf8cache, I8, PERL___I) /* Is the utf8 caching code enabled? */ +#undef PERL___I + #ifdef USE_LOCALE_NUMERIC |