From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 30 Oct 2005 16:41:02 +0000 (+0000)
Subject: I infer that change 25891 as-is would break OS2. This should fix it.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=15871fce9413472c456f7af6b3953480020578b6;p=p5sagit%2Fp5-mst-13.2.git

I infer that change 25891 as-is would break OS2. This should fix it.

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

diff --git a/perl.h b/perl.h
index 8427328..10fcd4b 100644
--- a/perl.h
+++ b/perl.h
@@ -5402,8 +5402,10 @@ extern void moncontrol(int);
 /* do_exec is a real function implemented in a platform specific file.  */
 #  define do_exec			Perl_do_exec
 #endif
-#ifndef OS2
-#define do_aexec(really, mark,sp)	do_aexec5(really, mark, sp, 0, 0)
+#ifdef OS2
+#  define do_aexec			Perl_do_aexec
+#else
+#  define do_aexec(really, mark,sp)	do_aexec5(really, mark, sp, 0, 0)
 #endif
 
 /* and finally... */