__attribute__nonnull__(pTHX_6);
PERL_CALLCONV void Perl_delete_eval_scope(pTHX);
-PERL_CALLCONV void Perl_deprecate(pTHX_ const char* s)
+PERL_CALLCONV void Perl_deprecate(pTHX_ const char *const s)
__attribute__nonnull__(pTHX_1);
-PERL_CALLCONV void Perl_deprecate_old(pTHX_ const char* s)
+PERL_CALLCONV void Perl_deprecate_old(pTHX_ const char *const s)
__attribute__nonnull__(pTHX_1);
PERL_CALLCONV OP* Perl_die(pTHX_ const char* pat, ...)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
-PERL_CALLCONV PerlIO* Perl_my_popen_list(pTHX_ char* mode, int n, SV ** args)
+PERL_CALLCONV PerlIO* Perl_my_popen_list(pTHX_ const char* mode, int n, SV ** args)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_3);
__attribute__malloc__
__attribute__warn_unused_result__;
-PERL_CALLCONV char* Perl_scan_vstring(pTHX_ const char *vstr, const char *end, SV *sv)
+PERL_CALLCONV char* Perl_scan_vstring(pTHX_ const char *vstr, const char *const end, SV *sv)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2)
__attribute__nonnull__(pTHX_3);
PERL_CALLCONV I32 Perl_call_pv(pTHX_ const char* sub_name, I32 flags)
__attribute__nonnull__(pTHX_1);
-PERL_CALLCONV I32 Perl_call_sv(pTHX_ SV* sv, I32 flags)
+PERL_CALLCONV I32 Perl_call_sv(pTHX_ SV* sv, VOL I32 flags)
__attribute__nonnull__(pTHX_1);
PERL_CALLCONV void Perl_despatch_signals(pTHX);
__attribute__nonnull__(pTHX_1);
PERL_CALLCONV void Perl_save_re_context(pTHX);
-PERL_CALLCONV void Perl_save_padsv(pTHX_ PADOFFSET off);
+PERL_CALLCONV void Perl_save_padsv_and_mortalize(pTHX_ PADOFFSET off);
PERL_CALLCONV void Perl_save_sptr(pTHX_ SV** sptr)
__attribute__nonnull__(pTHX_1);
PERL_CALLCONV void Perl_sv_dump(pTHX_ SV* sv)
__attribute__nonnull__(pTHX_1);
-PERL_CALLCONV bool Perl_sv_derived_from(pTHX_ SV* sv, const char* name)
+PERL_CALLCONV bool Perl_sv_derived_from(pTHX_ SV* sv, const char *const name)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
-PERL_CALLCONV bool Perl_sv_does(pTHX_ SV* sv, const char* name)
+PERL_CALLCONV bool Perl_sv_does(pTHX_ SV* sv, const char *const name)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
PERL_CALLCONV void Perl_write_to_stderr(pTHX_ const char* message, int msglen)
__attribute__nonnull__(pTHX_1);
-PERL_CALLCONV int Perl_yyerror(pTHX_ const char* s)
+PERL_CALLCONV int Perl_yyerror(pTHX_ const char *const s)
__attribute__nonnull__(pTHX_1);
PERL_CALLCONV int Perl_yylex(pTHX);
PERL_CALLCONV void Perl_parser_free(pTHX_ const yy_parser *)
__attribute__nonnull__(pTHX_1);
-PERL_CALLCONV int Perl_yywarn(pTHX_ const char* s)
+PERL_CALLCONV int Perl_yywarn(pTHX_ const char *const s)
__attribute__nonnull__(pTHX_1);
#if defined(MYMALLOC)
# endif
# if !defined(NV_PRESERVES_UV)
+# ifdef DEBUGGING
STATIC int S_sv_2iuv_non_preserve(pTHX_ SV *sv, I32 numtype)
__attribute__nonnull__(pTHX_1);
+# else
+STATIC int S_sv_2iuv_non_preserve(pTHX_ SV *sv)
+ __attribute__nonnull__(pTHX_1);
+
+# endif
# endif
STATIC I32 S_expect_number(pTHX_ char** pattern)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_2)
__attribute__nonnull__(pTHX_5);
-STATIC void S_update_debugger_info(pTHX_ SV *orig_sv, const char *buf, STRLEN len);
+STATIC void S_update_debugger_info(pTHX_ SV *orig_sv, const char *const buf, STRLEN len);
STATIC char* S_skipspace(pTHX_ char *s)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1);
__attribute__nonnull__(pTHX_2)
__attribute__nonnull__(pTHX_3);
-STATIC bool S_feature_is_enabled(pTHX_ const char* name, STRLEN namelen)
+STATIC bool S_feature_is_enabled(pTHX_ const char *const name, STRLEN namelen)
__attribute__nonnull__(pTHX_1);
STATIC void S_force_ident(pTHX_ const char *s, int kind)
STATIC void S_missingterm(pTHX_ char *s)
__attribute__noreturn__;
-STATIC void S_no_op(pTHX_ const char *what, char *s)
+STATIC void S_no_op(pTHX_ const char *const what, char *s)
__attribute__nonnull__(pTHX_1);
STATIC I32 S_sublex_done(pTHX)
# endif
# if defined(DEBUGGING)
-STATIC int S_tokereport(pTHX_ I32 rv);
-STATIC void S_printbuf(pTHX_ const char* fmt, const char* s)
+STATIC int S_tokereport(pTHX_ I32 rv, const YYSTYPE* lvalp)
+ __attribute__nonnull__(pTHX_2);
+
+STATIC void S_printbuf(pTHX_ const char *const fmt, const char *const s)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);