Eliminate the use of PL_curforce outside of toke.c

p4raw-id: //depot/perl@30821

1 files changed, 0 insertions, 4 deletions

diff --git a/perl.c b/perl.c
index 67a7907170..e18d5cc112 100644
--- a/perl.c
+++ b/perl.c
@@ -411,10 +411,6 @@ perl_construct(pTHXx)
     PL_timesbase.tms_cstime = 0;
 #endif
 
-#ifdef PERL_MAD
-    PL_curforce = -1;
-#endif
-
     ENTER;
 }