diff options
Diffstat (limited to 'System/Posix/Unistd.hsc')
| -rw-r--r-- | System/Posix/Unistd.hsc | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/System/Posix/Unistd.hsc b/System/Posix/Unistd.hsc index 7f79113..84bd472 100644 --- a/System/Posix/Unistd.hsc +++ b/System/Posix/Unistd.hsc @@ -2,7 +2,7 @@ {-# LANGUAGE NondecreasingIndentation #-} #if __GLASGOW_HASKELL__ >= 709 {-# LANGUAGE Safe #-} -#elif __GLASGOW_HASKELL__ >= 703 +#else {-# LANGUAGE Trustworthy #-} #endif ----------------------------------------------------------------------------- @@ -118,9 +118,7 @@ sleep :: Int -> IO Int sleep 0 = return 0 sleep secs = do r <- c_sleep (fromIntegral secs); return (fromIntegral r) -#ifdef __GLASGOW_HASKELL__ {-# WARNING sleep "This function has several shortcomings (see documentation). Please consider using Control.Concurrent.threadDelay instead." #-} -#endif foreign import ccall safe "sleep" c_sleep :: CUInt -> IO CUInt |