Silence win32 compiler warning

The function's parameter was not declared const in embed.fnc, but was in
the function itself.

2 files changed, 2 insertions, 2 deletions

diff --git a/embed.fnc b/embed.fnc
index 392e5ee4fb..49cf3f4941 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -529,7 +529,7 @@ i	|void	|op_relocate_sv	|NN SV** svp|NN PADOFFSET* targp
 i	|OP*	|newMETHOP_internal	|I32 type|I32 flags|NULLOK OP* dynamic_meth \
 					|NULLOK SV* const_meth
 : FIXME
-s	|OP*	|fold_constants	|NN OP *o
+s	|OP*	|fold_constants	|NN OP * const o
 #endif
 Afpd	|char*	|form		|NN const char* pat|...
 Ap	|char*	|vform		|NN const char* pat|NULLOK va_list* args
diff --git a/proto.h b/proto.h
index 1d1846e07c..ecf6f71c11 100644
--- a/proto.h
+++ b/proto.h
@@ -4541,7 +4541,7 @@ STATIC void	S_finalize_op(pTHX_ OP* o);
 STATIC void	S_find_and_forget_pmops(pTHX_ OP *o);
 #define PERL_ARGS_ASSERT_FIND_AND_FORGET_PMOPS	\
 	assert(o)
-STATIC OP*	S_fold_constants(pTHX_ OP *o);
+STATIC OP*	S_fold_constants(pTHX_ OP * const o);
 #define PERL_ARGS_ASSERT_FOLD_CONSTANTS	\
 	assert(o)
 STATIC OP*	S_force_list(pTHX_ OP* arg, bool nullit);