[commit: packages/process] master: Define compatibility types for Windows (2e5219f)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/process

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/2e5219f58e8f54b30acdab9fa26dc51e5de19244/process

>---------------------------------------------------------------

commit 2e5219f58e8f54b30acdab9fa26dc51e5de19244
Author: Michael Snoyman <michael at snoyman.com>
Date:   Thu Oct 15 08:03:45 2015 +0300

    Define compatibility types for Windows


>---------------------------------------------------------------

2e5219f58e8f54b30acdab9fa26dc51e5de19244
 System/Process/Internals.hs | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/System/Process/Internals.hs b/System/Process/Internals.hs
index bbf6e37..5575ac4 100644
--- a/System/Process/Internals.hs
+++ b/System/Process/Internals.hs
@@ -59,6 +59,8 @@ import Data.Char
 import System.IO
 import System.Posix.Process.Internals ( pPrPr_disableITimers, c_execvpe )
 import System.Posix.Types
+#else
+import Data.Word (Word32)
 #endif
 
 #ifdef __GLASGOW_HASKELL__
@@ -99,6 +101,13 @@ import System.FilePath
 # endif
 #endif
 
+#if defined(mingw32_HOST_OS) || defined(__MINGW32__)
+-- Define some missing types for Windows compatibility
+newtype CGid = CGid Word32
+type GroupID = CGid
+type UserID = CGid
+#endif
+
 -- ----------------------------------------------------------------------------
 -- ProcessHandle type