From: Hans Mulder <hansmu@xs4all.nl>
Date: Fri, 3 Apr 1998 13:58:15 +0000 (-0800)
Subject: [win32] fix order of init
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1a441de9e39aa86c8c59c2fcffec5059a718b16e;p=p5sagit%2Fp5-mst-13.2.git

[win32] fix order of init
	Message-Id: <3.0.5.32.19980403135815.009d2440@osshe.edu>
	Subject: [PATCH 5.004_64] perl dies in perl_construct when compiled
		 with MULTIPLICITY

p4raw-id: //depot/win32/perl@875
---

diff --git a/perl.c b/perl.c
index f84e241..fdbdad1 100644
--- a/perl.c
+++ b/perl.c
@@ -176,6 +176,7 @@ perl_construct(register PerlInterpreter *sv_interp)
 #endif
     }
 
+    init_stacks(ARGS);
 #ifdef MULTIPLICITY
     I_REINIT;
     perl_destruct_level = 1; 
@@ -211,7 +212,6 @@ perl_construct(register PerlInterpreter *sv_interp)
 
     fdpid = newAV();	/* for remembering popen pids by fd */
 
-    init_stacks(ARGS);
     DEBUG( {
 	New(51,debname,128,char);
 	New(52,debdelim,128,char);