From: Gisle Aas <gisle@aas.no>
Date: Mon, 3 Oct 2005 09:37:57 +0000 (-0700)
Subject: Clone PL_statusvalue_posix [PATCH]
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=49cf90411ef5ee744fe54688234613893a6876a9;p=p5sagit%2Fp5-mst-13.2.git

Clone PL_statusvalue_posix [PATCH]
Message-ID: <lr3bni8ska.fsf_-_@caliper.activestate.com>

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

diff --git a/sv.c b/sv.c
index 24c497d..3581b50 100644
--- a/sv.c
+++ b/sv.c
@@ -11462,6 +11462,8 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
     PL_statusvalue	= proto_perl->Istatusvalue;
 #ifdef VMS
     PL_statusvalue_vms	= proto_perl->Istatusvalue_vms;
+#else
+    PL_statusvalue_posix = proto_perl->Istatusvalue_posix;
 #endif
     PL_encoding		= sv_dup(proto_perl->Iencoding, param);