Convert _is_uni_perl_idcont to legal name

Author: khwilliamson

embed.fnc

@@ -1721,7 +1721,7 @@ ATdip	|bool	|is_strict_utf8_string_loclen				\
 				|NULLOK STRLEN *el
 CRp	|bool	|_is_uni_FOO	|const U8 classnum			\
 				|const UV c
-CRp	|bool	|_is_uni_perl_idcont					\
+CRp	|bool	|is_uni_perl_idcont_					\
 				|UV c
 CRp	|bool	|is_uni_perl_idstart_					\
 				|UV c

embed.h

@@ -117,7 +117,6 @@
 # define SvUV(a)                                Perl_SvUV(aTHX_ a)
 # define SvUV_nomg(a)                           Perl_SvUV_nomg(aTHX_ a)
 # define _is_uni_FOO(a,b)                       Perl__is_uni_FOO(aTHX_ a,b)
-# define _is_uni_perl_idcont(a)                 Perl__is_uni_perl_idcont(aTHX_ a)
 # define _is_utf8_FOO(a,b,c)                    Perl__is_utf8_FOO(aTHX_ a,b,c)
 # define _is_utf8_perl_idcont(a,b)              Perl__is_utf8_perl_idcont(aTHX_ a,b)
 # define amagic_call(a,b,c,d)                   Perl_amagic_call(aTHX_ a,b,c,d)
@@ -322,6 +321,7 @@
 # define Perl_is_strict_utf8_string             is_strict_utf8_string
 # define Perl_is_strict_utf8_string_loc         is_strict_utf8_string_loc
 # define is_strict_utf8_string_loclen           Perl_is_strict_utf8_string_loclen
+# define is_uni_perl_idcont_(a)                 Perl_is_uni_perl_idcont_(aTHX_ a)
 # define is_uni_perl_idstart_(a)                Perl_is_uni_perl_idstart_(aTHX_ a)
 # define is_utf8_FF_helper_                     Perl_is_utf8_FF_helper_
 # define Perl_is_utf8_char_buf                  is_utf8_char_buf

handy.h

@@ -2147,7 +2147,7 @@ END_EXTERN_C
 #define isDIGIT_uvchr(c)      generic_invlist_uvchr_(CC_DIGIT_, c)
 #define isGRAPH_uvchr(c)      generic_invlist_uvchr_(CC_GRAPH_, c)
 #define isIDCONT_uvchr(c)                                                   \
-                    generic_uvchr_(CC_WORDCHAR_, _is_uni_perl_idcont, c)
+                    generic_uvchr_(CC_WORDCHAR_, is_uni_perl_idcont_, c)
 #define isIDFIRST_uvchr(c)                                                  \
                     generic_uvchr_(CC_IDFIRST_, is_uni_perl_idstart_, c)
 #define isLOWER_uvchr(c)      generic_invlist_uvchr_(CC_LOWER_, c)
@@ -2212,7 +2212,7 @@ END_EXTERN_C
 #define isDIGIT_LC_uvchr(c)  generic_LC_invlist_uvchr_(isDIGIT_LC, CC_DIGIT_, c)
 #define isGRAPH_LC_uvchr(c)  generic_LC_invlist_uvchr_(isGRAPH_LC, CC_GRAPH_, c)
 #define isIDCONT_LC_uvchr(c) generic_LC_uvchr_(isIDCONT_LC,                   \
-                                                  _is_uni_perl_idcont, c)
+                                                  is_uni_perl_idcont_, c)
 #define isIDFIRST_LC_uvchr(c) generic_LC_uvchr_(isIDFIRST_LC,                 \
                                                   is_uni_perl_idstart_, c)
 #define isLOWER_LC_uvchr(c)  generic_LC_invlist_uvchr_(isLOWER_LC, CC_LOWER_, c)

proto.h

@@ -3543,7 +3543,7 @@ Perl__is_uni_FOO(pTHX_ const U8 classnum, const UV c)
 }
 
 bool
-Perl__is_uni_perl_idcont(pTHX_ UV c)
+Perl_is_uni_perl_idcont_(pTHX_ UV c)
 {
     return _invlist_contains_cp(PL_utf8_perl_idcont, c);
 }