From b6cbe4e36af5a486678e4622839dcef2aa487cc7 Mon Sep 17 00:00:00 2001 From: simonpj Date: Wed, 13 Oct 2004 10:24:16 +0000 Subject: [PATCH] [project @ 2004-10-13 10:24:16 by simonpj] c_execvpe & pPrPr_disableITimers: remove these in a Windows build. --- System/Process/Internals.hs | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/System/Process/Internals.hs b/System/Process/Internals.hs index eb16d36..6751d15 100644 --- a/System/Process/Internals.hs +++ b/System/Process/Internals.hs @@ -15,7 +15,10 @@ -- #hide module System.Process.Internals ( - ProcessHandle(..), PHANDLE, pPrPr_disableITimers, c_execvpe + ProcessHandle(..), PHANDLE, +#if !defined(mingw32_TARGET_OS) && !defined(__MINGW32__) + pPrPr_disableITimers, c_execvpe +#endif ) where #if !defined(mingw32_TARGET_OS) && !defined(__MINGW32__) @@ -51,6 +54,8 @@ newtype ProcessHandle = ProcessHandle PHANDLE -- ---------------------------------------------------------------------------- +#if !defined(mingw32_TARGET_OS) && !defined(__MINGW32__) + -- this function disables the itimer, which would otherwise cause confusing -- signals to be sent to the new process. foreign import ccall unsafe "pPrPr_disableITimers" @@ -58,3 +63,5 @@ foreign import ccall unsafe "pPrPr_disableITimers" foreign import ccall unsafe "execvpe" c_execvpe :: CString -> Ptr CString -> Ptr CString -> IO CInt + +#endif -- 1.7.10.4