From 711aba4c46216686b303e46f6e8b7dfac7b2420f Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 30 Oct 2005 16:07:58 +0000
Subject: [PATCH] Fix win32 breakage inadvertently introduced by 25889

p4raw-id: //depot/perl@25896
---
 perl.h | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/perl.h b/perl.h
index 7e3b3ee..8427328 100644
--- a/perl.h
+++ b/perl.h
@@ -5397,7 +5397,10 @@ extern void moncontrol(int);
 #define do_open(g, n, l, a, rm, rp, sf) \
 	do_openn(g, n, l, a, rm, rp, sf, (SV **) NULL, 0)
 #ifdef PERL_DEFAULT_DO_EXEC3_IMPLEMENTATION
-#define do_exec(cmd)			do_exec3(cmd,0,0)
+#  define do_exec(cmd)			do_exec3(cmd,0,0)
+#else
+/* 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)
-- 
2.7.4