#define vivify_ref Perl_vivify_ref
#define wait4pid Perl_wait4pid
#define parse_unicode_opts Perl_parse_unicode_opts
+#endif
#define seed Perl_seed
+#ifdef PERL_CORE
#define get_hash_seed Perl_get_hash_seed
#define report_evil_fh Perl_report_evil_fh
#define report_uninit Perl_report_uninit
#if defined(PERL_IN_UTF8_C) || defined(PERL_DECL_PROT)
#ifdef PERL_CORE
#define is_utf8_char_slow S_is_utf8_char_slow
+#define is_utf8_common S_is_utf8_common
#endif
#endif
#define sv_setsv_flags Perl_sv_setsv_flags
#endif
#ifndef SPRINTF_RETURNS_STRLEN
#endif
+#ifdef PERL_CORE
+#define my_clearenv Perl_my_clearenv
+#endif
#define ck_anoncode Perl_ck_anoncode
#define ck_bitop Perl_ck_bitop
#define ck_concat Perl_ck_concat
#define vivify_ref(a,b) Perl_vivify_ref(aTHX_ a,b)
#define wait4pid(a,b,c) Perl_wait4pid(aTHX_ a,b,c)
#define parse_unicode_opts(a) Perl_parse_unicode_opts(aTHX_ a)
+#endif
#define seed() Perl_seed(aTHX)
+#ifdef PERL_CORE
#define get_hash_seed() Perl_get_hash_seed(aTHX)
#define report_evil_fh(a,b,c) Perl_report_evil_fh(aTHX_ a,b,c)
#define report_uninit(a) Perl_report_uninit(aTHX_ a)
#if defined(PERL_IN_UTF8_C) || defined(PERL_DECL_PROT)
#ifdef PERL_CORE
#define is_utf8_char_slow(a,b) S_is_utf8_char_slow(aTHX_ a,b)
+#define is_utf8_common(a,b,c) S_is_utf8_common(aTHX_ a,b,c)
#endif
#endif
#define sv_setsv_flags(a,b,c) Perl_sv_setsv_flags(aTHX_ a,b,c)
#endif
#ifndef SPRINTF_RETURNS_STRLEN
#endif
+#ifdef PERL_CORE
+#define my_clearenv() Perl_my_clearenv(aTHX)
+#endif
#define ck_anoncode(a) Perl_ck_anoncode(aTHX_ a)
#define ck_bitop(a) Perl_ck_bitop(aTHX_ a)
#define ck_concat(a) Perl_ck_concat(aTHX_ a)