#ifndef PERL_NO_UTF16_FILTER
#ifdef PERL_CORE
#define utf16_textfilter S_utf16_textfilter
+#define add_utf16_textfilter S_add_utf16_textfilter
#endif
#endif
#ifdef PERL_CORE
#define pregfree(a) Perl_pregfree(aTHX_ a)
#define pregfree2(a) Perl_pregfree2(aTHX_ a)
#if defined(PERL_CORE) || defined(PERL_EXT)
-#define reg_temp_copy(a) Perl_reg_temp_copy(aTHX_ a)
+#define reg_temp_copy(a,b) Perl_reg_temp_copy(aTHX_ a,b)
#endif
#define regfree_internal(a) Perl_regfree_internal(aTHX_ a)
#if defined(USE_ITHREADS)
#ifndef PERL_NO_UTF16_FILTER
#ifdef PERL_CORE
#define utf16_textfilter(a,b,c) S_utf16_textfilter(aTHX_ a,b,c)
+#define add_utf16_textfilter(a,b) S_add_utf16_textfilter(aTHX_ a,b)
#endif
#endif
#ifdef PERL_CORE
#define sublex_done() S_sublex_done(aTHX)
#define sublex_push() S_sublex_push(aTHX)
#define sublex_start() S_sublex_start(aTHX)
-#define filter_gets(a,b,c) S_filter_gets(aTHX_ a,b,c)
+#define filter_gets(a,b) S_filter_gets(aTHX_ a,b)
#define find_in_my_stash(a,b) S_find_in_my_stash(aTHX_ a,b)
#define tokenize_use(a,b) S_tokenize_use(aTHX_ a,b)
#define deprecate_commaless_var_list() S_deprecate_commaless_var_list(aTHX)