diff options
Diffstat (limited to 'regen/opcode.pl')
| -rwxr-xr-x | regen/opcode.pl | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/regen/opcode.pl b/regen/opcode.pl index c1c105fb26..9aedc59347 100755 --- a/regen/opcode.pl +++ b/regen/opcode.pl @@ -1034,11 +1034,9 @@ START_EXTERN_C #ifdef PERL_GLOBAL_STRUCT_INIT # define PERL_PPADDR_INITED static const Perl_ppaddr_t Gppaddr[] -#else -# ifndef PERL_GLOBAL_STRUCT -# define PERL_PPADDR_INITED +#elif !defined(PERL_GLOBAL_STRUCT) +# define PERL_PPADDR_INITED EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */ -# endif #endif /* PERL_GLOBAL_STRUCT */ #if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT) # define PERL_PPADDR_INITED @@ -1066,11 +1064,9 @@ print $oc <<'END'; #ifdef PERL_GLOBAL_STRUCT_INIT # define PERL_CHECK_INITED static const Perl_check_t Gcheck[] -#else -# ifndef PERL_GLOBAL_STRUCT -# define PERL_CHECK_INITED +#elif !defined(PERL_GLOBAL_STRUCT) +# define PERL_CHECK_INITED EXT Perl_check_t PL_check[] /* or perlvars.h */ -# endif #endif #if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT) # define PERL_CHECK_INITED |