unzipWith
, global
- , myGetProcessID
#if __GLASGOW_HASKELL__ <= 408
, catchJust
#if __GLASGOW_HASKELL__ <= 408
import Exception ( catchIO, justIoErrors, raiseInThread )
#endif
-#ifndef mingw32_TARGET_OS
-import Posix
-#endif
+
infixr 9 `thenCmp`
\end{code}
ioErrors = justIoErrors
throwTo = raiseInThread
#endif
-
-#ifdef mingw32_TARGET_OS
-foreign import "_getpid" myGetProcessID :: IO Int
-#else
-myGetProcessID :: IO Int
-myGetProcessID = Posix.getProcessID
-#endif
\end{code}