diff options
author | Herbert Valerio Riedel <hvr@gnu.org> | 2016-01-30 17:31:48 +0100 |
---|---|---|
committer | Herbert Valerio Riedel <hvr@gnu.org> | 2016-01-30 17:31:48 +0100 |
commit | 7fdf4cda3b229e2873a46e0482c83f52b714c5fe (patch) | |
tree | 579dd8e4bd9d9051835d16d41e9e4027b69d9190 /System | |
parent | 44a8b5240a8766f2561f36400713ea524dd745b0 (diff) |
Replace `__hsunix_times` wrapper with CApiFFI
Diffstat (limited to 'System')
-rw-r--r-- | System/Posix/Process/Common.hsc | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/System/Posix/Process/Common.hsc b/System/Posix/Process/Common.hsc index 66e0d20..c13bf5e 100644 --- a/System/Posix/Process/Common.hsc +++ b/System/Posix/Process/Common.hsc @@ -1,3 +1,4 @@ +{-# LANGUAGE CApiFFI #-} {-# LANGUAGE InterruptibleFFI, RankNTypes #-} #ifdef __GLASGOW_HASKELL__ {-# LANGUAGE Trustworthy #-} @@ -213,7 +214,7 @@ getProcessTimes = do type CTms = () -foreign import ccall unsafe "__hsunix_times" +foreign import capi unsafe "HsUnix.h times" c_times :: Ptr CTms -> IO CClock -- ----------------------------------------------------------------------------- |