mktables: Adjust where .pl suffix gets added to output filenames

[perl5.git] / embed.fnc

diff --git a/embed.fnc b/embed.fnc
index e8cf4ae..e1a5010 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1300,10 +1300,6 @@ Apd      |void   |sv_vsetpvfn    |NN SV *const sv|NN const char *const pat|const STRLEN pa
 ApR    |NV     |str_to_version |NN SV *sv
 Ap     |SV*    |swash_init     |NN const char* pkg|NN const char* name|NN SV* listsv|I32 minbits|I32 none
 Ap     |UV     |swash_fetch    |NN SV *swash|NN const U8 *ptr|bool do_utf8
-EXMpR  |HV*    |_swash_inversion_hash  |NN SV* const swash
-EXMpR  |SV*    |_new_invlist   |IV initial_size
-EXMpR  |SV*    |_swash_to_invlist      |NN SV* const swash
-EXMp   |void   |_append_range_to_invlist   |NN SV* const invlist|const UV start|const UV end
 #ifdef PERL_IN_REGCOMP_C
 EiMR   |SV*    |add_cp_to_invlist      |NULLOK SV* invlist|const UV cp
 EsMR   |SV*    |add_range_to_invlist   |NULLOK SV* invlist|const UV start|const UV end
@@ -1320,10 +1316,16 @@ EiMR    |SV*    |invlist_clone  |NN SV* const invlist
 EiMR   |UV*    |get_invlist_iter_addr  |NN SV* invlist
 EiM    |void   |invlist_iterinit|NN SV* invlist
 EsMR   |bool   |invlist_iternext|NN SV* invlist|NN UV* start|NN UV* end
-EsM    |void   |invlist_intersection   |NN SV* const a|NN SV* const b|NN SV** i
-EsM    |void   |invlist_union  |NN SV* const a|NN SV* const b|NN SV** output
-EsM    |void   |invlist_subtract|NN SV* const a|NN SV* const b|NN SV** result
-EiM    |void   |invlist_invert|NN SV* const invlist
+#endif
+#if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_UTF8_C)
+EpM    |void   |_invlist_intersection  |NN SV* const a|NN SV* const b|NN SV** i
+EpM    |void   |_invlist_union |NN SV* const a|NN SV* const b|NN SV** output
+EpM    |void   |_invlist_subtract|NN SV* const a|NN SV* const b|NN SV** result
+EpM    |void   |_invlist_invert|NN SV* const invlist
+EXMpR  |HV*    |_swash_inversion_hash  |NN SV* const swash
+EXMpR  |SV*    |_new_invlist   |IV initial_size
+EXMpR  |SV*    |_swash_to_invlist      |NN SV* const swash
+EXMp   |void   |_append_range_to_invlist   |NN SV* const invlist|const UV start|const UV end
 #endif
 Ap     |void   |taint_env
 Ap     |void   |taint_proper   |NULLOK const char* f|NN const char *const s