# define perl_init_i18nl10n(a) init_i18nl10n(a)
# define perl_require_pv(a) require_pv(a)
-/* varargs functions can't be handled with CPP macros. :-(
- This provides a set of compatibility functions that don't take
- an extra argument but grab the context pointer using the macro
- dTHX.
+/* Before C99, macros could not wrap varargs functions. This
+ provides a set of compatibility functions that don't take an
+ extra argument but grab the context pointer using the macro dTHX.
*/
# if defined(MULTIPLICITY) && !defined(PERL_NO_SHORT_NAMES)
# define ck_entersub_args_proto(a,b,c) Perl_ck_entersub_args_proto(aTHX_ a,b,c)
# define ck_entersub_args_proto_or_list(a,b,c) Perl_ck_entersub_args_proto_or_list(aTHX_ a,b,c)
# define clear_defarray(a,b) Perl_clear_defarray(aTHX_ a,b)
+# define clear_defarray_simple(a) Perl_clear_defarray_simple(aTHX_ a)
# define cop_fetch_label(a,b,c) Perl_cop_fetch_label(aTHX_ a,b,c)
# define cop_store_label(a,b,c,d) Perl_cop_store_label(aTHX_ a,b,c,d)
# define croak_memory_wrap Perl_croak_memory_wrap
# define newHVREF(a) Perl_newHVREF(aTHX_ a)
# define newHVhv(a) Perl_newHVhv(aTHX_ a)
# define newLISTOP(a,b,c,d) Perl_newLISTOP(aTHX_ a,b,c,d)
+# define newLISTOPn(a,...) Perl_newLISTOPn(aTHX_ a,__VA_ARGS__)
# define newLOGOP(a,b,c,d) Perl_newLOGOP(aTHX_ a,b,c,d)
# define newLOOPEX(a,b) Perl_newLOOPEX(aTHX_ a,b)
# define newLOOPOP(a,b,c,d) Perl_newLOOPOP(aTHX_ a,b,c,d)
# define newXS(a,b,c) Perl_newXS(aTHX_ a,b,c)
# define newXS_flags(a,b,c,d,e) Perl_newXS_flags(aTHX_ a,b,c,d,e)
# define new_stackinfo(a,b) Perl_new_stackinfo(aTHX_ a,b)
+# define new_stackinfo_flags(a,b,c) Perl_new_stackinfo_flags(aTHX_ a,b,c)
# define new_version(a) Perl_new_version(aTHX_ a)
# define nothreadhook() Perl_nothreadhook(aTHX)
# define op_append_elem(a,b,c) Perl_op_append_elem(aTHX_ a,b,c)
# define perly_sighandler Perl_perly_sighandler
# define pmop_dump(a) Perl_pmop_dump(aTHX_ a)
# define pop_scope() Perl_pop_scope(aTHX)
+# define pop_stackinfo() Perl_pop_stackinfo(aTHX)
# define pregcomp(a,b) Perl_pregcomp(aTHX_ a,b)
# define pregexec(a,b,c,d,e,f,g) Perl_pregexec(aTHX_ a,b,c,d,e,f,g)
# define pregfree(a) Perl_pregfree(aTHX_ a)
# define ptr_table_split(a) Perl_ptr_table_split(aTHX_ a)
# define ptr_table_store(a,b,c) Perl_ptr_table_store(aTHX_ a,b,c)
# define push_scope() Perl_push_scope(aTHX)
+# define push_stackinfo(a,b) Perl_push_stackinfo(aTHX_ a,b)
# define pv_display(a,b,c,d,e) Perl_pv_display(aTHX_ a,b,c,d,e)
# define pv_escape(a,b,c,d,e,f) Perl_pv_escape(aTHX_ a,b,c,d,e,f)
# define pv_pretty(a,b,c,d,e,f,g) Perl_pv_pretty(aTHX_ a,b,c,d,e,f,g)
# define repeatcpy Perl_repeatcpy
# define require_pv(a) Perl_require_pv(aTHX_ a)
# define rninstr Perl_rninstr
+# define rpp_context(a,b,c) Perl_rpp_context(aTHX_ a,b,c)
+# define rpp_extend(a) Perl_rpp_extend(aTHX_ a)
+# define rpp_invoke_xs(a) Perl_rpp_invoke_xs(aTHX_ a)
+# define rpp_is_lone(a) Perl_rpp_is_lone(aTHX_ a)
+# define rpp_obliterate_stack_to(a) Perl_rpp_obliterate_stack_to(aTHX_ a)
+# define rpp_pop_1_norc() Perl_rpp_pop_1_norc(aTHX)
+# define rpp_popfree_1() Perl_rpp_popfree_1(aTHX)
+# define rpp_popfree_1_NN() Perl_rpp_popfree_1_NN(aTHX)
+# define rpp_popfree_2() Perl_rpp_popfree_2(aTHX)
+# define rpp_popfree_2_NN() Perl_rpp_popfree_2_NN(aTHX)
+# define rpp_popfree_to(a) Perl_rpp_popfree_to(aTHX_ a)
+# define rpp_popfree_to_NN(a) Perl_rpp_popfree_to_NN(aTHX_ a)
+# define rpp_push_1(a) Perl_rpp_push_1(aTHX_ a)
+# define rpp_push_1_norc(a) Perl_rpp_push_1_norc(aTHX_ a)
+# define rpp_push_2(a,b) Perl_rpp_push_2(aTHX_ a,b)
+# define rpp_push_IMM(a) Perl_rpp_push_IMM(aTHX_ a)
+# define rpp_replace_1_1(a) Perl_rpp_replace_1_1(aTHX_ a)
+# define rpp_replace_1_1_NN(a) Perl_rpp_replace_1_1_NN(aTHX_ a)
+# define rpp_replace_1_IMM_NN(a) Perl_rpp_replace_1_IMM_NN(aTHX_ a)
+# define rpp_replace_2_1(a) Perl_rpp_replace_2_1(aTHX_ a)
+# define rpp_replace_2_1_COMMON(a) Perl_rpp_replace_2_1_COMMON(aTHX_ a)
+# define rpp_replace_2_1_NN(a) Perl_rpp_replace_2_1_NN(aTHX_ a)
+# define rpp_replace_2_IMM_NN(a) Perl_rpp_replace_2_IMM_NN(aTHX_ a)
+# define rpp_replace_at(a,b) Perl_rpp_replace_at(aTHX_ a,b)
+# define rpp_replace_at_NN(a,b) Perl_rpp_replace_at_NN(aTHX_ a,b)
+# define rpp_replace_at_norc(a,b) Perl_rpp_replace_at_norc(aTHX_ a,b)
+# define rpp_replace_at_norc_NN(a,b) Perl_rpp_replace_at_norc_NN(aTHX_ a,b)
+# define rpp_stack_is_rc() Perl_rpp_stack_is_rc(aTHX)
+# define rpp_try_AMAGIC_1(a,b) Perl_rpp_try_AMAGIC_1(aTHX_ a,b)
+# define rpp_try_AMAGIC_2(a,b) Perl_rpp_try_AMAGIC_2(aTHX_ a,b)
+# define rpp_xpush_1(a) Perl_rpp_xpush_1(aTHX_ a)
+# define rpp_xpush_2(a,b) Perl_rpp_xpush_2(aTHX_ a,b)
+# define rpp_xpush_IMM(a) Perl_rpp_xpush_IMM(aTHX_ a)
# define rsignal(a,b) Perl_rsignal(aTHX_ a,b)
# define rsignal_state(a) Perl_rsignal_state(aTHX_ a)
# define runops_debug() Perl_runops_debug(aTHX)
# define sv_isa(a,b) Perl_sv_isa(aTHX_ a,b)
# define sv_isa_sv(a,b) Perl_sv_isa_sv(aTHX_ a,b)
# define sv_isobject(a) Perl_sv_isobject(aTHX_ a)
+# define sv_langinfo(a) Perl_sv_langinfo(aTHX_ a)
# define sv_len(a) Perl_sv_len(aTHX_ a)
# define sv_len_utf8(a) Perl_sv_len_utf8(aTHX_ a)
# define sv_len_utf8_nomg(a) Perl_sv_len_utf8_nomg(aTHX_ a)
# define sv_setuv(a,b) Perl_sv_setuv(aTHX_ a,b)
# define sv_setuv_mg(a,b) Perl_sv_setuv_mg(aTHX_ a,b)
# define sv_streq_flags(a,b,c) Perl_sv_streq_flags(aTHX_ a,b,c)
+# define sv_strftime_ints(a,b,c,d,e,f,g,h,i,j) Perl_sv_strftime_ints(aTHX_ a,b,c,d,e,f,g,h,i,j)
+# define sv_strftime_tm(a,b) Perl_sv_strftime_tm(aTHX_ a,b)
# define sv_string_from_errnum(a,b) Perl_sv_string_from_errnum(aTHX_ a,b)
# define sv_tainted(a) Perl_sv_tainted(aTHX_ a)
# define sv_true(a) Perl_sv_true(aTHX_ a)
# define sv_vsetpvf(a,b,c) Perl_sv_vsetpvf(aTHX_ a,b,c)
# define sv_vsetpvf_mg(a,b,c) Perl_sv_vsetpvf_mg(aTHX_ a,b,c)
# define sv_vsetpvfn(a,b,c,d,e,f,g) Perl_sv_vsetpvfn(aTHX_ a,b,c,d,e,f,g)
+# define switch_argstack(a) Perl_switch_argstack(aTHX_ a)
# define switch_to_global_locale() Perl_switch_to_global_locale(aTHX)
# define sync_locale() Perl_sync_locale(aTHX)
# define taint_env() Perl_taint_env(aTHX)
# define vcmp(a,b) Perl_vcmp(aTHX_ a,b)
# define vcroak(a,b) Perl_vcroak(aTHX_ a,b)
# define vdeb(a,b) Perl_vdeb(aTHX_ a,b)
+# define vfatal_warner(a,b,c) Perl_vfatal_warner(aTHX_ a,b,c)
# define vform(a,b) Perl_vform(aTHX_ a,b)
# define vload_module(a,b,c,d) Perl_vload_module(aTHX_ a,b,c,d)
# define vmess(a,b) Perl_vmess(aTHX_ a,b)
# define deb(...) Perl_deb(aTHX_ __VA_ARGS__)
# define die(...) Perl_die(aTHX_ __VA_ARGS__)
# define dump_indent(a,b,...) Perl_dump_indent(aTHX_ a,b,__VA_ARGS__)
+# define fatal_warner(a,...) Perl_fatal_warner(aTHX_ a,__VA_ARGS__)
# define form(...) Perl_form(aTHX_ __VA_ARGS__)
# define load_module(a,b,...) Perl_load_module(aTHX_ a,b,__VA_ARGS__)
# define mess(...) Perl_mess(aTHX_ __VA_ARGS__)
# define apply(a,b,c) Perl_apply(aTHX_ a,b,c)
# define av_extend_guts(a,b,c,d,e) Perl_av_extend_guts(aTHX_ a,b,c,d,e)
# define av_nonelem(a,b) Perl_av_nonelem(aTHX_ a,b)
+# define av_remove_offset(a) Perl_av_remove_offset(aTHX_ a)
# define bind_match(a,b,c) Perl_bind_match(aTHX_ a,b,c)
# define boot_core_PerlIO() Perl_boot_core_PerlIO(aTHX)
# define boot_core_UNIVERSAL() Perl_boot_core_UNIVERSAL(aTHX)
# define cmpchain_start(a,b,c) Perl_cmpchain_start(aTHX_ a,b,c)
# define core_prototype(a,b,c,d) Perl_core_prototype(aTHX_ a,b,c,d)
# define coresub_op(a,b,c) Perl_coresub_op(aTHX_ a,b,c)
-# define create_eval_scope(a,b) Perl_create_eval_scope(aTHX_ a,b)
+# define create_eval_scope(a,b,c) Perl_create_eval_scope(aTHX_ a,b,c)
# define croak_caller Perl_croak_caller
# define croak_no_mem Perl_croak_no_mem
+# define croak_no_mem_ext Perl_croak_no_mem_ext
# define croak_popstack Perl_croak_popstack
# define custom_op_get_field(a,b) Perl_custom_op_get_field(aTHX_ a,b)
# define cv_clone_into(a,b) Perl_cv_clone_into(aTHX_ a,b)
# define find_lexical_cv(a) Perl_find_lexical_cv(aTHX_ a)
# define find_runcv_where(a,b,c) Perl_find_runcv_where(aTHX_ a,b,c)
# define find_script(a,b,c,d) Perl_find_script(aTHX_ a,b,c,d)
-# define force_locale_unlock Perl_force_locale_unlock
+# define force_locale_unlock() Perl_force_locale_unlock(aTHX)
# define free_tied_hv_pool() Perl_free_tied_hv_pool(aTHX)
-# define get_extended_os_errno Perl_get_extended_os_errno
# define get_hash_seed(a) Perl_get_hash_seed(aTHX_ a)
# define get_no_modify() Perl_get_no_modify(aTHX)
# define get_opargs() Perl_get_opargs(aTHX)
# define scalar(a) Perl_scalar(aTHX_ a)
# define scalarvoid(a) Perl_scalarvoid(aTHX_ a)
# define set_caret_X() Perl_set_caret_X(aTHX)
-# define set_numeric_standard() Perl_set_numeric_standard(aTHX)
-# define set_numeric_underlying() Perl_set_numeric_underlying(aTHX)
+# define set_numeric_standard(a,b) Perl_set_numeric_standard(aTHX_ a,b)
+# define set_numeric_underlying(a,b) Perl_set_numeric_underlying(aTHX_ a,b)
# define setfd_cloexec Perl_setfd_cloexec
# define setfd_cloexec_for_nonsysfd(a) Perl_setfd_cloexec_for_nonsysfd(aTHX_ a)
# define setfd_cloexec_or_inhexec_by_sysfdness(a) Perl_setfd_cloexec_or_inhexec_by_sysfdness(aTHX_ a)
# if defined(PERL_IN_AV_C)
# define get_aux_mg(a) S_get_aux_mg(aTHX_ a)
# endif
-# if defined(PERL_IN_DEB_C)
-# define deb_stack_n(a,b,c,d,e) S_deb_stack_n(aTHX_ a,b,c,d,e)
-# endif
-# if defined(PERL_IN_DOIO_C)
-# define argvout_final(a,b,c) S_argvout_final(aTHX_ a,b,c)
-# define exec_failed(a,b,c) S_exec_failed(aTHX_ a,b,c)
-# define ingroup(a,b) S_ingroup(aTHX_ a,b)
-# define openn_cleanup(a,b,c,d,e,f,g,h,i,j,k,l,m) S_openn_cleanup(aTHX_ a,b,c,d,e,f,g,h,i,j,k,l,m)
-# define openn_setup(a,b,c,d,e,f) S_openn_setup(aTHX_ a,b,c,d,e,f)
-# endif
-# if defined(PERL_IN_DOOP_C)
-# define do_trans_complex(a,b) S_do_trans_complex(aTHX_ a,b)
-# define do_trans_count(a,b) S_do_trans_count(aTHX_ a,b)
-# define do_trans_count_invmap(a,b) S_do_trans_count_invmap(aTHX_ a,b)
-# define do_trans_invmap(a,b) S_do_trans_invmap(aTHX_ a,b)
-# define do_trans_simple(a,b) S_do_trans_simple(aTHX_ a,b)
-# endif
-# if defined(PERL_IN_DUMP_C)
-# define deb_curcv(a) S_deb_curcv(aTHX_ a)
-# define debprof(a) S_debprof(aTHX_ a)
-# define pm_description(a) S_pm_description(aTHX_ a)
-# define sequence_num(a) S_sequence_num(aTHX_ a)
-# endif
-# if defined(PERL_IN_GLOBALS_C) || defined(PERL_IN_OP_C) || \
- defined(PERL_IN_PEEP_C)
+# if defined(PERL_IN_CLASS_C) || defined(PERL_IN_GLOBALS_C) || \
+ defined(PERL_IN_OP_C) || defined(PERL_IN_PEEP_C)
# define ck_anoncode(a) Perl_ck_anoncode(aTHX_ a)
# define ck_backtick(a) Perl_ck_backtick(aTHX_ a)
# define ck_bitop(a) Perl_ck_bitop(aTHX_ a)
+# define ck_classname(a) Perl_ck_classname(aTHX_ a)
# define ck_cmp(a) Perl_ck_cmp(aTHX_ a)
# define ck_concat(a) Perl_ck_concat(aTHX_ a)
# define ck_defined(a) Perl_ck_defined(aTHX_ a)
# define ck_tell(a) Perl_ck_tell(aTHX_ a)
# define ck_trunc(a) Perl_ck_trunc(aTHX_ a)
# define ck_trycatch(a) Perl_ck_trycatch(aTHX_ a)
-# endif /* defined(PERL_IN_GLOBALS_C) || defined(PERL_IN_OP_C) ||
- defined(PERL_IN_PEEP_C) */
+# endif /* defined(PERL_IN_CLASS_C) || defined(PERL_IN_GLOBALS_C) ||
+ defined(PERL_IN_OP_C) || defined(PERL_IN_PEEP_C) */
+# if defined(PERL_IN_DEB_C)
+# define deb_stack_n(a,b,c,d,e,f) S_deb_stack_n(aTHX_ a,b,c,d,e,f)
+# endif
+# if defined(PERL_IN_DOIO_C)
+# define argvout_final(a,b,c) S_argvout_final(aTHX_ a,b,c)
+# define exec_failed(a,b,c) S_exec_failed(aTHX_ a,b,c)
+# define ingroup(a,b) S_ingroup(aTHX_ a,b)
+# define is_fork_open S_is_fork_open
+# define openn_cleanup(a,b,c,d,e,f,g,h,i,j,k,l,m) S_openn_cleanup(aTHX_ a,b,c,d,e,f,g,h,i,j,k,l,m)
+# define openn_setup(a,b,c,d,e,f) S_openn_setup(aTHX_ a,b,c,d,e,f)
+# endif
+# if defined(PERL_IN_DOOP_C)
+# define do_trans_complex(a,b) S_do_trans_complex(aTHX_ a,b)
+# define do_trans_count(a,b) S_do_trans_count(aTHX_ a,b)
+# define do_trans_count_invmap(a,b) S_do_trans_count_invmap(aTHX_ a,b)
+# define do_trans_invmap(a,b) S_do_trans_invmap(aTHX_ a,b)
+# define do_trans_simple(a,b) S_do_trans_simple(aTHX_ a,b)
+# endif
+# if defined(PERL_IN_DUMP_C)
+# define deb_curcv(a) S_deb_curcv(aTHX_ a)
+# define debprof(a) S_debprof(aTHX_ a)
+# define pm_description(a) S_pm_description(aTHX_ a)
+# define sequence_num(a) S_sequence_num(aTHX_ a)
+# endif
# if defined(PERL_IN_GV_C)
# define find_default_stash(a,b,c,d,e,f) S_find_default_stash(aTHX_ a,b,c,d,e,f)
# define gv_fetchmeth_internal(a,b,c,d,e,f) S_gv_fetchmeth_internal(aTHX_ a,b,c,d,e,f)
# endif /* defined(PERL_IN_HV_C) */
# if defined(PERL_IN_LOCALE_C)
# define get_locale_string_utf8ness_i(a,b,c,d) S_get_locale_string_utf8ness_i(aTHX_ a,b,c,d)
+# define ints_to_tm(a,b,c,d,e,f,g,h,i,j) S_ints_to_tm(aTHX_ a,b,c,d,e,f,g,h,i,j)
# define is_locale_utf8(a) S_is_locale_utf8(aTHX_ a)
-# if defined(HAS_LOCALECONV)
-# define my_localeconv(a) S_my_localeconv(aTHX_ a)
-# define populate_hash_from_localeconv(a,b,c,d,e) S_populate_hash_from_localeconv(aTHX_ a,b,c,d,e)
+# define my_localeconv(a) S_my_localeconv(aTHX_ a)
+# define populate_hash_from_C_localeconv(a,b,c,d,e) S_populate_hash_from_C_localeconv(aTHX_ a,b,c,d,e)
+# define save_to_buffer(a,b,c) S_save_to_buffer(aTHX_ a,b,c)
+# define set_save_buffer_min_size(a,b,c) S_set_save_buffer_min_size(aTHX_ a,b,c)
+# define strftime8(a,b,c,d,e) S_strftime8(aTHX_ a,b,c,d,e)
+# define strftime_tm(a,b) S_strftime_tm(aTHX_ a,b)
+# if defined(HAS_MISSING_LANGINFO_ITEM_) || !defined(HAS_NL_LANGINFO)
+# define emulate_langinfo(a,b,c,d) S_emulate_langinfo(aTHX_ a,b,c,d)
# endif
# if defined(USE_LOCALE)
-# define calculate_LC_ALL_string(a) S_calculate_LC_ALL_string(aTHX_ a)
+# define calculate_LC_ALL_string(a,b,c,d) S_calculate_LC_ALL_string(aTHX_ a,b,c,d)
+# define external_call_langinfo(a,b,c) S_external_call_langinfo(aTHX_ a,b,c)
# define get_category_index_helper(a,b,c) S_get_category_index_helper(aTHX_ a,b,c)
# define mortalized_pv_copy(a) S_mortalized_pv_copy(aTHX_ a)
+# define native_querylocale_i(a) S_native_querylocale_i(aTHX_ a)
# define new_LC_ALL(a,b) S_new_LC_ALL(aTHX_ a,b)
-# define save_to_buffer S_save_to_buffer
+# define output_check_environment_warning(a,b,c) S_output_check_environment_warning(aTHX_ a,b,c)
+# define parse_LC_ALL_string(a,b,c,d,e,f) S_parse_LC_ALL_string(aTHX_ a,b,c,d,e,f)
# define setlocale_failure_panic_via_i(a,b,c,d,e,f,g) S_setlocale_failure_panic_via_i(aTHX_ a,b,c,d,e,f,g)
-# define stdize_locale(a,b,c,d,e) S_stdize_locale(aTHX_ a,b,c,d,e)
# if defined(DEBUGGING)
# define my_setlocale_debug_string_i(a,b,c,d) S_my_setlocale_debug_string_i(aTHX_ a,b,c,d)
# endif
-# if defined(HAS_NL_LANGINFO) || defined(HAS_NL_LANGINFO_L)
-# define my_langinfo_i(a,b,c,d,e,f) S_my_langinfo_i(aTHX_ a,b,c,d,e,f)
+# if defined(HAS_NL_LANGINFO)
+# define langinfo_sv_i(a,b,c,d,e) S_langinfo_sv_i(aTHX_ a,b,c,d,e)
+# endif
+# if defined(LC_ALL)
+# define give_perl_locale_control(a,b) S_give_perl_locale_control(aTHX_ a,b)
# else
-# define my_langinfo_i(a,b,c,d,e,f) S_my_langinfo_i(aTHX_ a,b,c,d,e,f)
+# define give_perl_locale_control(a,b) S_give_perl_locale_control(aTHX_ a,b)
# endif
# if defined(USE_LOCALE_COLLATE)
# define new_collate(a,b) S_new_collate(aTHX_ a,b)
# define is_codeset_name_UTF8 S_is_codeset_name_UTF8
# define new_ctype(a,b) S_new_ctype(aTHX_ a,b)
# endif
+# if defined(USE_LOCALE_MONETARY) || defined(USE_LOCALE_NUMERIC)
+# define populate_hash_from_localeconv(a,b,c,d,e) S_populate_hash_from_localeconv(aTHX_ a,b,c,d,e)
+# endif
# if defined(USE_LOCALE_NUMERIC)
# define new_numeric(a,b) S_new_numeric(aTHX_ a,b)
# endif
# endif
# if defined(USE_POSIX_2008_LOCALE)
# define bool_setlocale_2008_i(a,b,c) S_bool_setlocale_2008_i(aTHX_ a,b,c)
-# define querylocale_2008_i(a) S_querylocale_2008_i(aTHX_ a)
-# define setlocale_from_aggregate_LC_ALL(a,b) S_setlocale_from_aggregate_LC_ALL(aTHX_ a,b)
+# define querylocale_2008_i(a,b) S_querylocale_2008_i(aTHX_ a,b)
# define use_curlocale_scratch() S_use_curlocale_scratch(aTHX)
# if !defined(USE_QUERYLOCALE)
-# define update_PL_curlocales_i(a,b) S_update_PL_curlocales_i(aTHX_ a,b)
+# define update_PL_curlocales_i(a,b,c) S_update_PL_curlocales_i(aTHX_ a,b,c)
# endif
# elif defined(USE_LOCALE_THREADS) && \
!defined(USE_THREAD_SAFE_LOCALE) && \
# define mg_find_mglob(a) Perl_mg_find_mglob(aTHX_ a)
# define multiconcat_stringify(a) Perl_multiconcat_stringify(aTHX_ a)
# define multideref_stringify(a,b) Perl_multideref_stringify(aTHX_ a,b)
-# define my_strftime8_temp(a,b,c,d,e,f,g,h,i,j,k) Perl_my_strftime8_temp(aTHX_ a,b,c,d,e,f,g,h,i,j,k)
# define op_clear(a) Perl_op_clear(aTHX_ a)
# define qerror(a) Perl_qerror(aTHX_ a)
# define reg_named_buff(a,b,c,d) Perl_reg_named_buff(aTHX_ a,b,c,d)
# define visit(a,b,c) S_visit(aTHX_ a,b,c)
# if defined(DEBUGGING)
# define del_sv(a) S_del_sv(aTHX_ a)
+# define sv_mark_arenas() Perl_sv_mark_arenas(aTHX)
+# define sv_sweep_arenas() Perl_sv_sweep_arenas(aTHX)
# endif
# if !defined(NV_PRESERVES_UV)
# if defined(DEBUGGING)
# define cx_topblock(a) Perl_cx_topblock(aTHX_ a)
# define gimme_V() Perl_gimme_V(aTHX)
# endif /* !defined(PERL_NO_INLINE_FUNCTIONS) */
+# if defined(PERL_RC_STACK)
+# define runops_wrap() Perl_runops_wrap(aTHX)
+# endif
# if defined(PERL_USE_3ARG_SIGHANDLER)
# define csighandler Perl_csighandler
# else