diff options
| author | Karl Williamson <khw@cpan.org> | 2018-03-31 11:18:38 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2018-03-31 15:36:45 -0600 |
| commit | f1bcae08d82e5348df8b5dc0c44313ea38deb12b (patch) | |
| tree | f8c12cfd58ff90426563d05ef2688442b6e58cdf /embed.h | |
| parent | 9c4165e33442f4b2fbc036d677b5a9196a5375ee (diff) | |
| download | perl-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 'embed.h')
| -rw-r--r-- | embed.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1084,7 +1084,7 @@ #endif #define regprop(a,b,c,d,e) Perl_regprop(aTHX_ a,b,c,d,e) # 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) #define _get_swash_invlist(a) Perl__get_swash_invlist(aTHX_ a) #define _invlist_contains_cp S__invlist_contains_cp #define _invlist_len S__invlist_len |