From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sun, 30 Apr 2000 16:59:22 +0000 (+0000)
Subject: unbalanced LEAVE after perl_clone(...,0) (from Doug MacEachern)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=985e7056fef949f3176563d9b3ab8a0c4dfed901;p=p5sagit%2Fp5-mst-13.2.git

unbalanced LEAVE after perl_clone(...,0) (from Doug MacEachern)

p4raw-id: //depot/perl@6022
---

diff --git a/sv.c b/sv.c
index 65e2837..7f7c9a6 100644
--- a/sv.c
+++ b/sv.c
@@ -7870,6 +7870,7 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
     }
     else {
 	init_stacks();
+	ENTER;			/* perl_destruct() wants to LEAVE; */
     }
 
     PL_start_env	= proto_perl->Tstart_env;	/* XXXXXX */