Oops. Being too terse for my own good - it's not a great idea to chain

assignment of char * to struct pmop *, even when the value is NULL.

p4raw-id: //depot/perl@27734

diff --git a/perl.c b/perl.c
index 8278442..1045c73 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -3474,7 +3474,8 @@ S_init_interp(pTHX)
     /* As these are inside a structure, PERLVARI isn't capable of initialising
        them  */
     PL_regindent = 0;
-    PL_reg_oldcurpm = PL_reg_curpm = PL_reg_poscache = PL_reg_starttry = NULL;
+    PL_reg_oldcurpm = PL_reg_curpm = NULL;
+    PL_reg_poscache = PL_reg_starttry = NULL;
 }
 
 STATIC void