From eb7b3f484a407c1bbfe89627adaeb5edc5e77736 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sun, 16 Feb 2003 08:29:54 +0000 Subject: [PATCH] Forgotten from #18715. p4raw-id: //depot/perl@18716 --- embed.h | 6 ++++++ proto.h | 1 + 2 files changed, 7 insertions(+) diff --git a/embed.h b/embed.h index 887eee1..b8cc87b 100644 --- a/embed.h +++ b/embed.h @@ -1097,6 +1097,9 @@ #define wait4pid Perl_wait4pid #endif #ifdef PERL_CORE +#define parse_unicode_opts Perl_parse_unicode_opts +#endif +#ifdef PERL_CORE #define report_evil_fh Perl_report_evil_fh #endif #ifdef PERL_CORE @@ -3546,6 +3549,9 @@ #define wait4pid(a,b,c) Perl_wait4pid(aTHX_ a,b,c) #endif #ifdef PERL_CORE +#define parse_unicode_opts(a) Perl_parse_unicode_opts(aTHX_ a) +#endif +#ifdef PERL_CORE #define report_evil_fh(a,b,c) Perl_report_evil_fh(aTHX_ a,b,c) #endif #ifdef PERL_CORE diff --git a/proto.h b/proto.h index fb6911e..4b527cd 100644 --- a/proto.h +++ b/proto.h @@ -854,6 +854,7 @@ PERL_CALLCONV char* Perl_sv_uni_display(pTHX_ SV *dsv, SV *ssv, STRLEN pvlim, UV PERL_CALLCONV void Perl_vivify_defelem(pTHX_ SV* sv); PERL_CALLCONV void Perl_vivify_ref(pTHX_ SV* sv, U32 to_what); PERL_CALLCONV I32 Perl_wait4pid(pTHX_ Pid_t pid, int* statusp, int flags); +PERL_CALLCONV U32 Perl_parse_unicode_opts(pTHX_ char **popt); PERL_CALLCONV void Perl_report_evil_fh(pTHX_ GV *gv, IO *io, I32 op); PERL_CALLCONV void Perl_report_uninit(pTHX); PERL_CALLCONV void Perl_warn(pTHX_ const char* pat, ...) -- 2.7.4