diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-06-05 13:09:46 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2011-07-03 14:05:48 -0600 |
| commit | 839cfe5dcd857d5775f8c5d638b85b1a539d73c9 (patch) | |
| tree | be26f24c6dd6ff581c7536b85efd3e01610f3346 /embed.h | |
| parent | 86f766ab4498faec81165593180e92fcd9d760df (diff) | |
| download | perl-839cfe5dcd857d5775f8c5d638b85b1a539d73c9.tar.gz | |
Allow utf8.c to access 4 inversion list functions
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 10 |
1 files changed, 6 insertions, 4 deletions
@@ -866,10 +866,6 @@ # endif # if defined(PERL_IN_REGCOMP_C) #define _invlist_array_init(a,b) S__invlist_array_init(aTHX_ a,b) -#define _invlist_intersection(a,b,c) Perl__invlist_intersection(aTHX_ a,b,c) -#define _invlist_invert(a) Perl__invlist_invert(aTHX_ a) -#define _invlist_subtract(a,b,c) Perl__invlist_subtract(aTHX_ a,b,c) -#define _invlist_union(a,b,c) Perl__invlist_union(aTHX_ a,b,c) #define add_alternate(a,b,c) S_add_alternate(aTHX_ a,b,c) #define add_cp_to_invlist(a,b) S_add_cp_to_invlist(aTHX_ a,b) #define add_data S_add_data @@ -917,6 +913,12 @@ #define set_regclass_bit_fold(a,b,c,d,e) S_set_regclass_bit_fold(aTHX_ a,b,c,d,e) #define study_chunk(a,b,c,d,e,f,g,h,i,j,k) S_study_chunk(aTHX_ a,b,c,d,e,f,g,h,i,j,k) # endif +# if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_UTF8_C) +#define _invlist_intersection(a,b,c) Perl__invlist_intersection(aTHX_ a,b,c) +#define _invlist_invert(a) Perl__invlist_invert(aTHX_ a) +#define _invlist_subtract(a,b,c) Perl__invlist_subtract(aTHX_ a,b,c) +#define _invlist_union(a,b,c) Perl__invlist_union(aTHX_ a,b,c) +# endif # if defined(PERL_IN_REGEXEC_C) #define find_byclass(a,b,c,d,e) S_find_byclass(aTHX_ a,b,c,d,e) #define reg_check_named_buff_matched(a,b) S_reg_check_named_buff_matched(aTHX_ a,b) |