summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-03-31 11:18:38 -0600
committerKarl Williamson <khw@cpan.org>2018-03-31 15:36:45 -0600
commitf1bcae08d82e5348df8b5dc0c44313ea38deb12b (patch)
treef8c12cfd58ff90426563d05ef2688442b6e58cdf /proto.h
parent9c4165e33442f4b2fbc036d677b5a9196a5375ee (diff)
downloadperl-f1bcae08d82e5348df8b5dc0c44313ea38deb12b.tar.gz
Use charnames inversion lists
This commit makes the inversion lists for parsing character name global instead of interpreter level, so can be initialized once per process, and no copies are created upon new thread instantiation. More importantly, this is another instance where utf8_heavy.pl no longer needs to be loaded, and the definition files read from disk.
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/proto.h b/proto.h
index 6e2f6463ca..91bcd6d4a6 100644
--- a/proto.h
+++ b/proto.h
@@ -5444,7 +5444,7 @@ PERL_CALLCONV void Perl_regprop(pTHX_ const regexp *prog, SV* sv, const regnode*
#define PERL_ARGS_ASSERT_REGPROP \
assert(sv); assert(o)
#endif
-#if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_UTF8_C)
+#if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_TOKE_C) || defined(PERL_IN_UTF8_C)
PERL_CALLCONV SV* Perl__get_swash_invlist(pTHX_ SV* const swash)
__attribute__warn_unused_result__;
#define PERL_ARGS_ASSERT__GET_SWASH_INVLIST \