summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-09-24 12:05:25 -0600
committerKarl Williamson <public@khwilliamson.com>2011-10-01 09:58:08 -0600
commitbc39fe246af9f9dbbeef6550e5e5795ca2c366e5 (patch)
treeb0e4988e7684282b0b71ac2ef26d3f87f1f6189e /perl.c
parent141d8bad68a083b9ce300cdc2e34549bd4240fe4 (diff)
downloadperl-bc39fe246af9f9dbbeef6550e5e5795ca2c366e5.tar.gz
No need for swashes for computing if ASCII
This information is trivially computed via the macro, no need to go out to disk and store a swash for this.
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/perl.c b/perl.c
index 4285834173..f0fda13ee2 100644
--- a/perl.c
+++ b/perl.c
@@ -983,7 +983,6 @@ perl_destruct(pTHXx)
/* clear utf8 character classes */
SvREFCNT_dec(PL_utf8_alnum);
- SvREFCNT_dec(PL_utf8_ascii);
SvREFCNT_dec(PL_utf8_alpha);
SvREFCNT_dec(PL_utf8_space);
SvREFCNT_dec(PL_utf8_cntrl);
@@ -1003,7 +1002,6 @@ perl_destruct(pTHXx)
SvREFCNT_dec(PL_utf8_idcont);
SvREFCNT_dec(PL_utf8_foldclosures);
PL_utf8_alnum = NULL;
- PL_utf8_ascii = NULL;
PL_utf8_alpha = NULL;
PL_utf8_space = NULL;
PL_utf8_cntrl = NULL;