regcomp: Add/subtract consts to match embed.fnc

3 files changed, 3 insertions, 3 deletions

diff --git a/embed.fnc b/embed.fnc
index 01621e7624..f447db7c3f 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1285,7 +1285,7 @@ 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	|HV*	|_new_invlist	|const IV initial_size
+EXMpR	|HV*	|_new_invlist	|IV initial_size
 EXMpR	|HV*	|_swash_to_invlist	|NN SV* const swash
 EXMp	|void	|_append_range_to_invlist   |NN HV* const invlist|const UV start|const UV end
 #ifdef PERL_IN_REGCOMP_C
diff --git a/proto.h b/proto.h
index 8441ee810e..bff673e20e 100644
--- a/proto.h
+++ b/proto.h
@@ -28,7 +28,7 @@ PERL_CALLCONV void	Perl__append_range_to_invlist(pTHX_ HV* const invlist, const
 #define PERL_ARGS_ASSERT__APPEND_RANGE_TO_INVLIST	\
 	assert(invlist)
 
-PERL_CALLCONV HV*	Perl__new_invlist(pTHX_ const IV initial_size)
+PERL_CALLCONV HV*	Perl__new_invlist(pTHX_ IV initial_size)
 			__attribute__warn_unused_result__;
 
 PERL_CALLCONV HV*	Perl__swash_inversion_hash(pTHX_ SV* const swash)
diff --git a/regcomp.c b/regcomp.c
index 1a03564382..d986c32d41 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5869,7 +5869,7 @@ S_invlist_trim(pTHX_ HV* const invlist)
 
 #ifndef PERL_IN_XSUB_RE
 void
-Perl__append_range_to_invlist(pTHX_ HV* invlist, const UV start, const UV end)
+Perl__append_range_to_invlist(pTHX_ HV* const invlist, const UV start, const UV end)
 {
    /* Subject to change or removal.  Append the range from 'start' to 'end' at
     * the end of the inversion list.  The range must be above any existing