regen/mk_invlists.pl: Extract code into subs

[perl5.git] / embed.fnc

diff --git a/embed.fnc b/embed.fnc
index 581ca79..7973d65 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -767,6 +767,7 @@ AMp |UV     |to_uni_upper   |UV c|NN U8 *p|NN STRLEN *lenp
 AMp    |UV     |to_uni_title   |UV c|NN U8 *p|NN STRLEN *lenp
 AbDMpR |bool   |isIDFIRST_lazy |NN const char* p
 AbDMpR |bool   |isALNUM_lazy   |NN const char* p
+p      |void   |init_uniprops
 #ifdef PERL_IN_UTF8_C
 snR    |U8     |to_lower_latin1|const U8 c|NULLOK U8 *p|NULLOK STRLEN *lenp  \
                |const char dummy