fix spurious cxstack_max init that trampled memory
Gurusamy Sarathy [Thu, 18 Jun 1998 16:35:11 +0000 (16:35 +0000)]
p4raw-id: //depot/perl@1144

perl.c

diff --git a/perl.c b/perl.c
index 7705a04..7e2d562 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -51,8 +51,6 @@ dEXTCONST char rcsid[] = "perl.c\nPatch level: ###\n";
     copline    = NOLINE;       \
     curcop     = &compiling;   \
     curcopdb    = NULL;                \
-    cxstack_ix  = -1;          \
-    cxstack_max = 128;         \
     dbargs     = 0;            \
     dlmax      = 128;          \
     laststatval        = -1;           \
@@ -67,6 +65,13 @@ dEXTCONST char rcsid[] = "perl.c\nPatch level: ###\n";
     laststatval = -1;          \
     laststype   = OP_STAT;     \
     mess_sv     = Nullsv;      \
+    splitstr    = " ";         \
+    generation  = 100;         \
+    exitlist    = NULL;                \
+    exitlistlen = 0;           \
+    regindent   = 0;           \
+    in_clean_objs = FALSE;     \
+    in_clean_all= FALSE;       \
   } STMT_END
 
 #ifdef PERL_OBJECT