summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-07-14 13:05:52 -0600
committerKarl Williamson <khw@cpan.org>2018-07-14 17:41:02 -0600
commit7258295b51ee7cac64553fcbcee5e51bd204fbbf (patch)
treec1022227ea3be07a9a809f932d4a4dca3c1b08ed /perl.c
parent6b877bbd2c071b3e0659fab552a74dc2ff7e08fb (diff)
downloadperl-7258295b51ee7cac64553fcbcee5e51bd204fbbf.tar.gz
Make global two interpreter variables
These variables are constant, once initialized, through the life of a program, so having them be per instance is a waste of time and space
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/perl.c b/perl.c
index 86376e30da..50af15dbc7 100644
--- a/perl.c
+++ b/perl.c
@@ -1166,14 +1166,8 @@ perl_destruct(pTHXx)
}
/* clear character classes */
- SvREFCNT_dec(PL_utf8_mark);
- SvREFCNT_dec(PL_InBitmap);
#ifdef USE_LOCALE_CTYPE
SvREFCNT_dec(PL_warn_locale);
-#endif
- PL_utf8_mark = NULL;
- PL_InBitmap = NULL;
-#ifdef USE_LOCALE_CTYPE
PL_warn_locale = NULL;
#endif