This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
embed.fnc: Mark several regex helpers as Core only
authorKarl Williamson <khw@cpan.org>
Wed, 22 Jul 2020 12:34:35 +0000 (06:34 -0600)
committerKarl Williamson <khw@cpan.org>
Sat, 5 Sep 2020 23:31:10 +0000 (17:31 -0600)
These are for internal regex use.

embed.fnc

index 172882c..ce16cc2 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1923,12 +1923,12 @@ Apdh    |I32    |pregexec       |NN REGEXP * const prog|NN char* stringarg \
                                |NN char* strend|NN char* strbeg \
                                |SSize_t minend |NN SV* screamer|U32 nosave
 Ap     |void   |pregfree       |NULLOK REGEXP* r
-Ap     |void   |pregfree2      |NN REGEXP *rx
+Cp     |void   |pregfree2      |NN REGEXP *rx
 : FIXME - is anything in re using this now?
 EXp    |REGEXP*|reg_temp_copy  |NULLOK REGEXP* dsv|NN REGEXP* ssv
-Ap     |void   |regfree_internal|NN REGEXP *const rx
+Cp     |void   |regfree_internal|NN REGEXP *const rx
 #if defined(USE_ITHREADS)
-Ap     |void*  |regdupe_internal|NN REGEXP * const r|NN CLONE_PARAMS* param
+Cp     |void*  |regdupe_internal|NN REGEXP * const r|NN CLONE_PARAMS* param
 #endif
 EXp    |regexp_engine const *|current_re_engine
 Apdh   |REGEXP*|pregcomp       |NN SV * const pattern|const U32 flags