Change 31474: make sure PL_Parser is NULL during early stage of thread clone

[Dave Mitchell]

Change 31474 by [EMAIL PROTECTED] on 2007/06/26 21:07:02

        make sure PL_Parser is NULL during early stage of thread clone

Affected files ...

... //depot/perl/sv.c#1415 edit

Differences ...

==== //depot/perl/sv.c#1415 (text) ====
Index: perl/sv.c
--- perl/sv.c#1414~31454~       2007-06-24 06:32:42.000000000 -0700
+++ perl/sv.c   2007-06-26 14:07:02.000000000 -0700
@@ -10906,6 +10906,7 @@
     PL_savestack_ix = 0;
     PL_savestack_max = -1;
     PL_sig_pending = 0;
+    PL_parser = NULL;
     Zero(&PL_debug_pad, 1, struct perl_debug_pad);
 #  else        /* !DEBUGGING */
     Zero(my_perl, 1, PerlInterpreter);
@@ -10940,6 +10941,7 @@
     PL_savestack_ix = 0;
     PL_savestack_max = -1;
     PL_sig_pending = 0;
+    PL_parser = NULL;
     Zero(&PL_debug_pad, 1, struct perl_debug_pad);
 #    else      /* !DEBUGGING */
     Zero(my_perl, 1, PerlInterpreter);
End of Patch.