This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
remove binary compatibility stuff from the yacc -> bison switch
authorDave Mitchell <davem@fdisolutions.com>
Sat, 14 Feb 2004 12:28:37 +0000 (12:28 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Sat, 14 Feb 2004 12:28:37 +0000 (12:28 +0000)
of change #22302
p4raw-link: @22302 on //depot/perl: 0de566d74fdaf0a49123989fe8d4ad06603c6608

p4raw-id: //depot/perl@22303

embedvar.h
intrpvar.h

index 104d853..b892164 100644 (file)
 #define PL_xpvnv_root          (vTHX->Ixpvnv_root)
 #define PL_xrv_arenaroot       (vTHX->Ixrv_arenaroot)
 #define PL_xrv_root            (vTHX->Ixrv_root)
-#define PL_yycharBINCOMPAT     (vTHX->IyycharBINCOMPAT)
-#define PL_yydebugBINCOMPAT    (vTHX->IyydebugBINCOMPAT)
-#define PL_yyerrflagBINCOMPAT  (vTHX->IyyerrflagBINCOMPAT)
-#define PL_yylvalBINCOMPAT     (vTHX->IyylvalBINCOMPAT)
-#define PL_yynerrsBINCOMPAT    (vTHX->IyynerrsBINCOMPAT)
-#define PL_yyvalBINCOMPAT      (vTHX->IyyvalBINCOMPAT)
 
 #else  /* !MULTIPLICITY */
 
 #define PL_Ixpvnv_root         PL_xpvnv_root
 #define PL_Ixrv_arenaroot      PL_xrv_arenaroot
 #define PL_Ixrv_root           PL_xrv_root
-#define PL_IyycharBINCOMPAT    PL_yycharBINCOMPAT
-#define PL_IyydebugBINCOMPAT   PL_yydebugBINCOMPAT
-#define PL_IyyerrflagBINCOMPAT PL_yyerrflagBINCOMPAT
-#define PL_IyylvalBINCOMPAT    PL_yylvalBINCOMPAT
-#define PL_IyynerrsBINCOMPAT   PL_yynerrsBINCOMPAT
-#define PL_IyyvalBINCOMPAT     PL_yyvalBINCOMPAT
 
 #define PL_TSv                 PL_Sv
 #define PL_TXpv                        PL_Xpv
index 2e9d1af..267fcd2 100644 (file)
@@ -397,15 +397,6 @@ PERLVARA(Ilast_swash_key,10,       U8)
 PERLVAR(Ilast_swash_tmps,      U8 *)
 PERLVAR(Ilast_swash_slen,      STRLEN)
 
-/* ex perly.c globals. Now just placeholders for BINCOMPAT in 5.8.x
- * XXX delete for 5.9.x */
-PERLVAR(IyydebugBINCOMPAT,     int)
-PERLVAR(IyynerrsBINCOMPAT,     int)
-PERLVAR(IyyerrflagBINCOMPAT,   int)
-PERLVAR(IyycharBINCOMPAT,      int)
-PERLVAR(IyyvalBINCOMPAT,       YYSTYPE)
-PERLVAR(IyylvalBINCOMPAT,      YYSTYPE)
-
 PERLVARI(Iglob_index,  int,    0)
 PERLVAR(Isrand_called, bool)
 PERLVARA(Iuudmap,256,  char)