From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 24 Nov 2007 10:44:25 +0000 (+0000)
Subject: Remove (probably) the last vestige of the assertions implementation -
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b1233c72f2dabb53e03a3ecd66d79abc753b42e0;p=p5sagit%2Fp5-mst-13.2.git

Remove (probably) the last vestige of the assertions implementation -
a now unused variable.

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

diff --git a/embedvar.h b/embedvar.h
index 3419aa7..71b603a 100644
--- a/embedvar.h
+++ b/embedvar.h
@@ -42,7 +42,6 @@
 
 #define PL_Argv			(vTHX->IArgv)
 #define PL_Cmd			(vTHX->ICmd)
-#define PL_DBassertion		(vTHX->IDBassertion)
 #define PL_DBcv			(vTHX->IDBcv)
 #define PL_DBgv			(vTHX->IDBgv)
 #define PL_DBline		(vTHX->IDBline)
@@ -355,7 +354,6 @@
 
 #define PL_IArgv		PL_Argv
 #define PL_ICmd			PL_Cmd
-#define PL_IDBassertion		PL_DBassertion
 #define PL_IDBcv		PL_DBcv
 #define PL_IDBgv		PL_DBgv
 #define PL_IDBline		PL_DBline
diff --git a/intrpvar.h b/intrpvar.h
index 373d181..8874e65 100644
--- a/intrpvar.h
+++ b/intrpvar.h
@@ -617,8 +617,6 @@ PERLVARI(Ithreadhook,	thrhook_proc_t,	MEMBER_TO_FPTR(Perl_nothreadhook))
 
 PERLVARI(Ihash_seed, UV, 0)		/* Hash initializer */
 
-PERLVAR(IDBassertion,   SV *)
-
 PERLVARI(Irehash_seed, UV, 0)		/* 582 hash initializer */
 
 PERLVARI(Iisarev, HV*, NULL) /* Reverse map of @ISA dependencies */
diff --git a/perlapi.h b/perlapi.h
index 9fe7a05..1468acc 100644
--- a/perlapi.h
+++ b/perlapi.h
@@ -120,8 +120,6 @@ END_EXTERN_C
 #define PL_Argv			(*Perl_IArgv_ptr(aTHX))
 #undef  PL_Cmd
 #define PL_Cmd			(*Perl_ICmd_ptr(aTHX))
-#undef  PL_DBassertion
-#define PL_DBassertion		(*Perl_IDBassertion_ptr(aTHX))
 #undef  PL_DBcv
 #define PL_DBcv			(*Perl_IDBcv_ptr(aTHX))
 #undef  PL_DBgv