summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-01-31 17:17:33 -0700
committerKarl Williamson <khw@cpan.org>2022-02-01 13:38:06 -0700
commitb4bc910fa23adc658ce538870d4f806f1a907380 (patch)
tree199868b05ea3de4a5a14330743e82e8b61203cbe
parenta6a6eee6da857dbb113d35fc617ecf81278fac64 (diff)
downloadperl-b4bc910fa23adc658ce538870d4f806f1a907380.tar.gz
embed.fnc Fix function return type
-rw-r--r--embed.fnc2
-rw-r--r--proto.h2
2 files changed, 2 insertions, 2 deletions
diff --git a/embed.fnc b/embed.fnc
index 39e7ae9bb0..45c6fd2b26 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -3730,6 +3730,6 @@ XEop |STRLEN*|dup_warnings |NULLOK STRLEN* warnings
Amd |void |CopFILEGV_set |NN COP * c|NN GV * gv
#endif
-Amd|char *const|phase_name|enum perl_phase
+Amd|const char *const|phase_name|enum perl_phase
: ex: set ts=8 sts=4 sw=4 noet:
diff --git a/proto.h b/proto.h
index b6e93d2b9a..2df7f0a30f 100644
--- a/proto.h
+++ b/proto.h
@@ -2815,7 +2815,7 @@ PERL_CALLCONV int perl_run(PerlInterpreter *my_perl);
assert(my_perl)
PERL_CALLCONV Signal_t Perl_perly_sighandler(int sig, Siginfo_t *info, void *uap, bool safe);
#define PERL_ARGS_ASSERT_PERLY_SIGHANDLER
-/* PERL_CALLCONV char *const phase_name(pTHX_ enum perl_phase); */
+/* PERL_CALLCONV const char *const phase_name(pTHX_ enum perl_phase); */
#define PERL_ARGS_ASSERT_PHASE_NAME
PERL_CALLCONV void Perl_pmop_dump(pTHX_ PMOP* pm);
#define PERL_ARGS_ASSERT_PMOP_DUMP