From: Gurusamy Sarathy <gsar@cpan.org>
Date: Tue, 6 Oct 1998 03:26:54 +0000 (+0000)
Subject: remove spurious unused conflicting globals (PL_yy{v,s}sp)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0ff51efc278c0cef1dd1d7684f0ec623079d88c7;p=p5sagit%2Fp5-mst-13.2.git

remove spurious unused conflicting globals (PL_yy{v,s}sp)

p4raw-id: //depot/perl@1924
---

diff --git a/Makefile.SH b/Makefile.SH
index c51b542..be25e74 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 404e5ec..c76d262 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 45a1f8d..10fcb35 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 29c8b73..c79c37d 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)
diff --git a/perly.c b/perly.c
index eccfdd7..2f9c045 100644
--- a/perly.c
+++ b/perly.c
@@ -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
 
diff --git a/toke.c b/toke.c
index 2518e54..88933de 100644
--- a/toke.c
+++ b/toke.c
@@ -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 1ff29a4..db1f255 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