diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-11-26 23:35:59 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-11-26 23:35:59 +0000 |
| commit | af41e527c8e130b652c27870cfc5eef3f1e00711 (patch) | |
| tree | e6c97219cde79854b571262b7b0b50b4dfffe16c /embed.h | |
| parent | 051b305ded17acbcebcc33237adf2a68c22c2001 (diff) | |
| download | perl-af41e527c8e130b652c27870cfc5eef3f1e00711.tar.gz | |
ywarn() is actually only used inside toke.c, so it can be static.
p4raw-id: //depot/perl@34941
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 12 |
1 files changed, 10 insertions, 2 deletions
@@ -1050,7 +1050,11 @@ #ifdef PERL_CORE #define yyparse Perl_yyparse #define parser_free Perl_parser_free -#define yywarn Perl_yywarn +#endif +#if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT) +#ifdef PERL_CORE +#define yywarn S_yywarn +#endif #endif #if defined(MYMALLOC) #define dump_mstats Perl_dump_mstats @@ -3393,7 +3397,11 @@ #ifdef PERL_CORE #define yyparse() Perl_yyparse(aTHX) #define parser_free(a) Perl_parser_free(aTHX_ a) -#define yywarn(a) Perl_yywarn(aTHX_ a) +#endif +#if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT) +#ifdef PERL_CORE +#define yywarn(a) S_yywarn(aTHX_ a) +#endif #endif #if defined(MYMALLOC) #define dump_mstats(a) Perl_dump_mstats(aTHX_ a) |