diff options
| author |  Herbert Valerio Riedel <hvr@gnu.org> | 2013-10-12 13:24:45 +0200 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2013-10-12 13:24:45 +0200 |
| commit | 2b69c54bbbc85993cb2456ecb60a40adb574ccda (patch) | |
| tree | 8dc41de1c014ca448220897de43366f31e79fc73 /System/Posix/Signals.hsc | |
| parent | 84ca1d2b4477076bc4441b7ba5a554162a272162 (diff) | |
Make compatible again for GHC back to 7.4.1
By avoiding `import Foreign` this accomplishes backward-compatibility
w.r.t. the `unsafePerformIO` relocation w/o resorting to CPP
conditionals.
Moreover, in order to support base<4.7 this commits needs to reintroduce
a harmless backport of `newFilePath`.
Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org>
Diffstat (limited to 'System/Posix/Signals.hsc')
| -rw-r--r-- | System/Posix/Signals.hsc | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/System/Posix/Signals.hsc b/System/Posix/Signals.hsc index 39de76b..eb46ba4 100644 --- a/System/Posix/Signals.hsc +++ b/System/Posix/Signals.hsc @@ -103,8 +103,12 @@ module System.Posix.Signals ( -- siginterrupt ) where -import Foreign +import Data.Word import Foreign.C +import Foreign.ForeignPtr +import Foreign.Marshal +import Foreign.Ptr +import Foreign.Storable import System.IO.Unsafe (unsafePerformIO) import System.Posix.Types import System.Posix.Internals |