uvoffuni_to_utf8_flags_msgs(): Fix compiler warning

A parameter to this function was declared const in embed.fnc, but isn't const. This commit also adds a const to another parameter that is constant.
Perl · May 12, 2023 · 76a319e · 76a319e
1 parent f4eb680
commit 76a319e
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/embed.fnc b/embed.fnc
@@ -3613,7 +3613,7 @@ CMdp	|U8 *	|uvoffuni_to_utf8_flags 				\
 Cp	|U8 *	|uvoffuni_to_utf8_flags_msgs				\
 				|NN U8 *d				\
 				|UV input_uv				\
-				|const UV flags 			\
+				|UV flags				\
 				|NULLOK HV **msgs
 Cp	|U8 *	|uvuni_to_utf8	|NN U8 *d				\
 				|UV uv

diff --git a/proto.h b/proto.h
diff --git a/utf8.c b/utf8.c
@@ -203,7 +203,7 @@ The caller, of course, is responsible for freeing any returned HV.
 /* Undocumented; we don't want people using this.  Instead they should use
  * uvchr_to_utf8_flags_msgs() */
 U8 *
-Perl_uvoffuni_to_utf8_flags_msgs(pTHX_ U8 *d, UV input_uv, UV flags, HV** msgs)
+Perl_uvoffuni_to_utf8_flags_msgs(pTHX_ U8 *d, const UV input_uv, UV flags, HV** msgs)
 {
     U8 *p;
     UV shifted_uv = input_uv;