summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-10-30 16:07:58 +0000
committerNicholas Clark <nick@ccl4.org>2005-10-30 16:07:58 +0000
commit711aba4c46216686b303e46f6e8b7dfac7b2420f (patch)
tree9555146de9e30ae02b487c92453437621f37f274 /perl.h
parent7a7b9979b52d5d343099df1ecef6251a3db2d8e8 (diff)
downloadperl-711aba4c46216686b303e46f6e8b7dfac7b2420f.tar.gz
Fix win32 breakage inadvertently introduced by 25889
p4raw-id: //depot/perl@25896
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl.h b/perl.h
index 7e3b3ee964..8427328215 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)