regcomp.c: Add 'const' to parameter

3 files changed, 3 insertions, 3 deletions

diff --git a/embed.fnc b/embed.fnc
index 439109dee6..fa7c36d331 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -2194,7 +2194,7 @@ Es	|void	|put_byte	|NN SV* sv|int c
 Es	|bool	|put_charclass_bitmap_innards|NN SV* sv	    \
 				|NN char* bitmap	    \
 				|NULLOK SV** bitmap_invlist
-Es	|void	|put_range	|NN SV* sv|UV start|UV end
+Es	|void	|put_range	|NN SV* sv|UV start|const UV end
 Es	|void	|dump_trie	|NN const struct _reg_trie_data *trie\
 				|NULLOK HV* widecharmap|NN AV *revcharmap\
 				|U32 depth
diff --git a/proto.h b/proto.h
index 167a70f049..c7d704c445 100644
--- a/proto.h
+++ b/proto.h
@@ -5392,7 +5392,7 @@ STATIC bool	S_put_charclass_bitmap_innards(pTHX_ SV* sv, char* bitmap, SV** bitm
 #define PERL_ARGS_ASSERT_PUT_CHARCLASS_BITMAP_INNARDS	\
 	assert(sv); assert(bitmap)
 
-STATIC void	S_put_range(pTHX_ SV* sv, UV start, UV end)
+STATIC void	S_put_range(pTHX_ SV* sv, UV start, const UV end)
 			__attribute__nonnull__(pTHX_1);
 #define PERL_ARGS_ASSERT_PUT_RANGE	\
 	assert(sv)
diff --git a/regcomp.c b/regcomp.c
index dbf8c4aa6c..a1beaf208f 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -16698,7 +16698,7 @@ S_put_byte(pTHX_ SV *sv, int c)
 }
 
 STATIC void
-S_put_range(pTHX_ SV *sv, UV start, UV end)
+S_put_range(pTHX_ SV *sv, UV start, const UV end)
 {
 
     /* Appends to 'sv' a displayable version of the range of code points from