diff options
| author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-03-20 21:15:43 +0000 |
|---|---|---|
| committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-07-20 23:28:12 +0100 |
| commit | 8c3a0f6ca6a8f3a02c3394507eb4284c1017dba1 (patch) | |
| tree | aaa777b26aeec48b155ff5b6465bdf8be109d7d4 /NetWare | |
| parent | 822c8b4dc3fe62cd97d78e693e5871fcc65782fd (diff) | |
| download | perl-8c3a0f6ca6a8f3a02c3394507eb4284c1017dba1.tar.gz | |
Remove PERL_GLOBAL_STRUCT
This was originally added for MinGW, which no longer needs it, and
only still used by Symbian, which is now removed.
This also leaves perlapi.[ch] empty, but we keep the header for CPAN
backwards compatibility.
Diffstat (limited to 'NetWare')
| -rw-r--r-- | NetWare/Makefile | 1 | ||||
| -rw-r--r-- | NetWare/interface.c | 14 | ||||
| -rw-r--r-- | NetWare/interface.cpp | 13 |
3 files changed, 0 insertions, 28 deletions
diff --git a/NetWare/Makefile b/NetWare/Makefile index 8b6b71c743..07d31f0e12 100644 --- a/NetWare/Makefile +++ b/NetWare/Makefile @@ -701,7 +701,6 @@ MICROCORE_SRC = \ ..\numeric.c \ ..\op.c \ ..\perl.c \ - ..\perlapi.c \ ..\perly.c \ ..\pp.c \ ..\pp_ctl.c \ diff --git a/NetWare/interface.c b/NetWare/interface.c index 1d298854c9..be3eddf149 100644 --- a/NetWare/interface.c +++ b/NetWare/interface.c @@ -125,20 +125,6 @@ int RunPerl(int argc, char **argv, char **env) PerlInterpreter *my_perl = NULL; // defined in Perl.h PerlInterpreter *new_perl = NULL; // defined in Perl.h - #ifdef PERL_GLOBAL_STRUCT - #define PERLVAR(prefix,var,type) - #define PERLVARA(prefix,var,type) - #define PERLVARI(prefix,var,type,init) PL_Vars.prefix##var = init; - #define PERLVARIC(prefix,var,type,init) PL_Vars.prefix##var = init; - - #include "perlvars.h" - - #undef PERLVAR - #undef PERLVARA - #undef PERLVARI - #undef PERLVARIC - #endif - PERL_SYS_INIT(&argc, &argv); if (!(my_perl = perl_alloc())) // Allocate memory for Perl. diff --git a/NetWare/interface.cpp b/NetWare/interface.cpp index b08d6c249e..b9795b3e71 100644 --- a/NetWare/interface.cpp +++ b/NetWare/interface.cpp @@ -120,19 +120,6 @@ int RunPerl(int argc, char **argv, char **env) PerlInterpreter *new_perl = NULL; // defined in Perl.h //__asm{int 3}; - #ifdef PERL_GLOBAL_STRUCT - #define PERLVAR(prefix,var,type) - #define PERLVARA(prefix,var,type) - #define PERLVARI(prefix,var,type,init) PL_Vars.prefix##var = init; - #define PERLVARIC(prefix,var,type,init) PL_Vars.prefix##var = init; - - #include "perlvars.h" - - #undef PERLVAR - #undef PERLVARA - #undef PERLVARI - #undef PERLVARIC - #endif PERL_SYS_INIT(&argc, &argv); |