diff --git a/System/Process.hs b/System/Process.hs
index 6ae1ac5e566e944664194aa8d4d3bebc92f49b6c..1b501002fec4fbde5fa732d0c72e76ed395885ec 100644
--- a/System/Process.hs
+++ b/System/Process.hs
@@ -71,6 +71,7 @@ import Prelude hiding (mapM)
 import System.Process.Internals
 
 import System.IO.Error
+import System.Posix.Types as Z
 import qualified Control.Exception as C
 import Control.Concurrent
 import Control.Monad
diff --git a/System/Process/Internals.hs b/System/Process/Internals.hs
index babadc13c11ce7f61a837ef29364fcad042309a7..c805ad0e2adaf2b015dad403ebf780f5207f742d 100644
--- a/System/Process/Internals.hs
+++ b/System/Process/Internals.hs
@@ -47,7 +47,7 @@ module System.Process.Internals (
 
 #ifndef __HUGS__
 #if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
-import System.Posix.Types ( CPid )
+import System.Posix.Types
 import System.Posix.Process.Internals ( pPrPr_disableITimers, c_execvpe )
 import System.IO 	( IOMode(..) )
 #else