diff options
| -rw-r--r-- | Makefile.SH | 2 | ||||
| -rw-r--r-- | Todo-5.005 | 7 | ||||
| -rw-r--r-- | embedvar.h | 4 | ||||
| -rw-r--r-- | perlvars.h | 2 | ||||
| -rw-r--r-- | perly.c | 2 | ||||
| -rw-r--r-- | toke.c | 2 | ||||
| -rw-r--r-- | vms/perly_c.vms | 2 |
7 files changed, 2 insertions, 19 deletions
diff --git a/Makefile.SH b/Makefile.SH index c51b542aee..be25e74ea2 100644 --- a/Makefile.SH +++ b/Makefile.SH @@ -671,8 +671,6 @@ $define) #define yynerrs PL_yynerrs\ #define yyerrflag PL_yyerrflag\ #define yychar PL_yychar\ -#define yyssp PL_yyssp\ -#define yyvsp PL_yyvsp\ #define yyval PL_yyval\ #define yylval PL_yylval' \ -e '/YYSTYPE *yyval;/D' \ diff --git a/Todo-5.005 b/Todo-5.005 index 404e5ecaff..c76d262272 100644 --- a/Todo-5.005 +++ b/Todo-5.005 @@ -19,7 +19,7 @@ Compiler from where newASSIGNOP steals the field) Namespace cleanup - symbol-space: "pl_" prefix for all global vars + symbol-space: "PL_" prefix for all global vars "Perl_" prefix for all functions CPP-space: restrict what we export from headers stop malloc()/free() pollution unless asked @@ -43,17 +43,15 @@ Win32 stuff rename new headers to be consistent with the rest sort out the spawnvp() mess work out DLL versioning - put perlobject in $ARCHNAME so it can coexist with rest get PERL_OBJECT building on non-win32? style-check Miscellaneous rename and alter ISA.pm magic_setisa should be made to update %FIELDS [???] - be generous in accepting foreign line terminations make filenames 8.3 friendly, where feasible upgrade to newer versions of all independently maintained modules - add new modules (Data-Dumper, Storable?) + add new modules (Archive::Tar, Compress::Zlib, CPAN::FTP?) test it with large parts of CPAN fix pod2html to generate relative URLs @@ -65,4 +63,3 @@ Documentation rework INSTALL to reflect changes in installation structure spot-check all new modules for completeness better docs for pack()/unpack() - add perlport.pod diff --git a/embedvar.h b/embedvar.h index 45a1f8d3d5..10fcb352d6 100644 --- a/embedvar.h +++ b/embedvar.h @@ -772,9 +772,7 @@ #define PL_yyerrflag (PL_Vars.Gyyerrflag) #define PL_yylval (PL_Vars.Gyylval) #define PL_yynerrs (PL_Vars.Gyynerrs) -#define PL_yyssp (PL_Vars.Gyyssp) #define PL_yyval (PL_Vars.Gyyval) -#define PL_yyvsp (PL_Vars.Gyyvsp) #else /* !PERL_GLOBAL_STRUCT */ @@ -907,9 +905,7 @@ #define PL_Gyyerrflag PL_yyerrflag #define PL_Gyylval PL_yylval #define PL_Gyynerrs PL_yynerrs -#define PL_Gyyssp PL_yyssp #define PL_Gyyval PL_yyval -#define PL_Gyyvsp PL_yyvsp #ifdef EMBED diff --git a/perlvars.h b/perlvars.h index 29c8b7319d..c79c37de3e 100644 --- a/perlvars.h +++ b/perlvars.h @@ -204,7 +204,5 @@ PERLVAR(Gyydebug, int) PERLVAR(Gyynerrs, int) PERLVAR(Gyyerrflag, int) PERLVAR(Gyychar, int) -PERLVAR(Gyyssp, short*) -PERLVAR(Gyyvsp, YYSTYPE*) PERLVAR(Gyyval, YYSTYPE) PERLVAR(Gyylval, YYSTYPE) @@ -10,8 +10,6 @@ static char yysccsid[] = "@(#)yaccpar 1.8 (Berkeley) 01/20/91"; #define yynerrs PL_yynerrs #define yyerrflag PL_yyerrflag #define yychar PL_yychar -#define yyssp PL_yyssp -#define yyvsp PL_yyvsp #define yyval PL_yyval #define yylval PL_yylval @@ -1532,8 +1532,6 @@ filter_gets(register SV *sv, register PerlIO *fp, STRLEN append) { "OPERATOR", "TERM", "REF", "STATE", "BLOCK", "TERMBLOCK" }; #endif -EXT int yychar; /* last token */ - /* yylex diff --git a/vms/perly_c.vms b/vms/perly_c.vms index 1ff29a4716..db1f255c56 100644 --- a/vms/perly_c.vms +++ b/vms/perly_c.vms @@ -11,8 +11,6 @@ static char yysccsid[] = "@(#)yaccpar 1.8 (Berkeley) 01/20/91"; #define yynerrs PL_yynerrs #define yyerrflag PL_yyerrflag #define yychar PL_yychar -#define yyssp PL_yyssp -#define yyvsp PL_yyvsp #define yyval PL_yyval #define yylval PL_yylval |