diff options
author | simonpj@microsoft.com <unknown> | 2010-11-16 17:25:36 +0000 |
---|---|---|
committer | simonpj@microsoft.com <unknown> | 2010-11-16 17:25:36 +0000 |
commit | 298d9fd83318c208dc6facf419c03926d65613e0 (patch) | |
tree | 63aa775816bfa9deffe0add88511240ffb40dc4a /System/Posix/Process.hsc | |
parent | 14022b586ca6f7b878481a3a5e05c090a6e21056 (diff) |
Remove unnecessary fromIntegral calls
Diffstat (limited to 'System/Posix/Process.hsc')
-rw-r--r-- | System/Posix/Process.hsc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/System/Posix/Process.hsc b/System/Posix/Process.hsc index 0a142d9..163c356 100644 --- a/System/Posix/Process.hsc +++ b/System/Posix/Process.hsc @@ -256,7 +256,7 @@ forkProcess action = do stable <- newStablePtr (runIO action) pid <- throwErrnoIfMinus1 "forkProcess" (forkProcessPrim stable) freeStablePtr stable - return $ fromIntegral pid + return pid foreign import ccall "forkProcess" forkProcessPrim :: StablePtr (IO ()) -> IO CPid #endif /* __GLASGOW_HASKELL__ */ |