diff options
author | Karl Williamson <khw@cpan.org> | 2014-05-05 19:37:58 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2014-05-31 11:37:24 -0600 |
commit | e123187a1c7666bc2bf1eab209057d9d3fe83f66 (patch) | |
tree | cda33288db40b7a4d67d3717588294e2b6bdd465 /embed.h | |
parent | 91e83b736b8e78a0acc723337e6e9a57ac548ef5 (diff) | |
download | perl-e123187a1c7666bc2bf1eab209057d9d3fe83f66.tar.gz |
utf8.c: Move a static function to inline.h
This is in preparation for it being called from outside utf8.c. It is
renamed to have a leading underscore to emphasize its private nature
Diffstat (limited to 'embed.h')
-rw-r--r-- | embed.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1027,6 +1027,7 @@ #ifdef PERL_CORE #define Slab_Alloc(a) Perl_Slab_Alloc(aTHX_ a) #define Slab_Free(a) Perl_Slab_Free(aTHX_ a) +#define _is_utf8_char_slow S__is_utf8_char_slow #define allocmy(a,b,c) Perl_allocmy(aTHX_ a,b,c) #define amagic_is_enabled(a) Perl_amagic_is_enabled(aTHX_ a) #define apply(a,b,c) Perl_apply(aTHX_ a,b,c) @@ -1694,7 +1695,6 @@ # endif # if defined(PERL_IN_UTF8_C) #define check_locale_boundary_crossing(a,b,c,d) S_check_locale_boundary_crossing(aTHX_ a,b,c,d) -#define is_utf8_char_slow S_is_utf8_char_slow #define is_utf8_common(a,b,c,d) S_is_utf8_common(aTHX_ a,b,c,d) #define swash_scan_list_line(a,b,c,d,e,f,g) S_swash_scan_list_line(aTHX_ a,b,c,d,e,f,g) #define swatch_get(a,b,c) S_swatch_get(aTHX_ a,b,c) |