From e969301f394bfa96c6a3ba97bf97c3fb48a9b711 Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Mon, 24 May 1999 01:51:24 +0000 Subject: [PATCH] remove vestiges of PL_last_proto p4raw-id: //depot/perl@3448 --- embedvar.h | 2 -- intrpvar.h | 1 - objXSUB.h | 2 -- 3 files changed, 5 deletions(-) diff --git a/embedvar.h b/embedvar.h index a8d83f5..e6dad21 100644 --- a/embedvar.h +++ b/embedvar.h @@ -199,7 +199,6 @@ #define PL_incgv (PL_curinterp->Iincgv) #define PL_initav (PL_curinterp->Iinitav) #define PL_inplace (PL_curinterp->Iinplace) -#define PL_last_proto (PL_curinterp->Ilast_proto) #define PL_lastfd (PL_curinterp->Ilastfd) #define PL_lastsize (PL_curinterp->Ilastsize) #define PL_lastspbase (PL_curinterp->Ilastspbase) @@ -333,7 +332,6 @@ #define PL_Iincgv PL_incgv #define PL_Iinitav PL_initav #define PL_Iinplace PL_inplace -#define PL_Ilast_proto PL_last_proto #define PL_Ilastfd PL_lastfd #define PL_Ilastsize PL_lastsize #define PL_Ilastspbase PL_lastspbase diff --git a/intrpvar.h b/intrpvar.h index 457ad75..e4f112e 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -119,7 +119,6 @@ PERLVAR(Ifdpid, AV *) /* keep fd-to-pid mappings for my_popen */ /* internal state */ PERLVAR(Itainting, bool) /* doing taint checks */ PERLVARI(Iop_mask, char *, NULL) /* masked operations for safe evals */ -PERLVAR(Ilast_proto, char *) /* Prototype of last sub seen. */ /* trace state */ PERLVAR(Idlevel, I32) diff --git a/objXSUB.h b/objXSUB.h index a74e8ee..c29bc06 100644 --- a/objXSUB.h +++ b/objXSUB.h @@ -266,8 +266,6 @@ #define PL_last_lop pPerl->PL_last_lop #undef PL_last_lop_op #define PL_last_lop_op pPerl->PL_last_lop_op -#undef PL_last_proto -#define PL_last_proto pPerl->PL_last_proto #undef PL_last_swash_hv #define PL_last_swash_hv pPerl->PL_last_swash_hv #undef PL_last_swash_key -- 2.7.4