X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=cbits%2Fexecvpe.c;h=2234f098dcf1eee0d68f7791dc0f15c84cf712d5;hb=0a41af38169035a4359c0c29bc1219af564dce64;hp=f19f9d784b6a5c07699d7f7698b1b0e629bcc9e8;hpb=edad1f42b5dfea7aaf640aaae808c14e6138551a;p=ghc-base.git

diff --git a/cbits/execvpe.c b/cbits/execvpe.c
index f19f9d7..2234f09 100644
--- a/cbits/execvpe.c
+++ b/cbits/execvpe.c
@@ -1,8 +1,11 @@
 /* -----------------------------------------------------------------------------
    (c) The University of Glasgow 1995-2004
-   
+
    Our low-level exec() variant.
    -------------------------------------------------------------------------- */
+#include "HsBase.h"
+
+#if !defined(mingw32_HOST_OS) /* to the end */
 
 /* Evidently non-Posix. */
 /* #include "PosixSource.h" */
@@ -13,7 +16,7 @@
 #include <string.h>
 #include <errno.h>
 
-/* 
+/*
  * We want the search semantics of execvp, but we want to provide our
  * own environment, like execve.  The following copyright applies to
  * this code, as it is a derivative of execvp:
@@ -51,7 +54,7 @@
  */
 
 int
-execvpe(char *name, char **argv, char **envp)
+execvpe(char *name, char *const argv[], char **envp)
 {
     register int lp, ln;
     register char *p;
@@ -168,3 +171,5 @@ void pPrPr_disableITimers (void)
    setitimer(ITIMER_PROF, &itv, NULL);
 #  endif
 }
+
+#endif