diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-07-15 22:01:52 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-07-19 09:39:06 -0600 |
| commit | afb790dd4ff01f57e25399cc548ef7f9609a1ad2 (patch) | |
| tree | b1f089df75cf221a9e9b045d879755b8046b7842 /embed.h | |
| parent | 8b27d3db700fc2fce268e3d78e221a16ccaca2e8 (diff) | |
| download | perl-afb790dd4ff01f57e25399cc548ef7f9609a1ad2.tar.gz | |
utf8.c: Create API so internals can be hidden
This creates a function to hide some of the internal details of swashes
from the regex engine, which is the only authorized user, enforced
through #ifdefs in embed.fnc. These work closely together, but it's
best to have a clean interface.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -953,6 +953,7 @@ # if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_UTF8_C) #define _core_swash_init(a,b,c,d,e,f,g,h) Perl__core_swash_init(aTHX_ a,b,c,d,e,f,g,h) #define _invlist_contents(a) Perl__invlist_contents(aTHX_ a) +#define _is_swash_user_defined(a) Perl__is_swash_user_defined(aTHX_ a) # endif # if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_UTF8_C) #define _add_range_to_invlist(a,b,c) Perl__add_range_to_invlist(aTHX_ a,b,c) |