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 (file)
--- 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 (file)
--- 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 (file)
--- 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