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/Files/Common.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/Files/Common.hsc')
-rw-r--r-- | System/Posix/Files/Common.hsc | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/System/Posix/Files/Common.hsc b/System/Posix/Files/Common.hsc index 9ce2f1d..75c7fde 100644 --- a/System/Posix/Files/Common.hsc +++ b/System/Posix/Files/Common.hsc @@ -85,11 +85,15 @@ import System.Posix.Error import System.Posix.Types import System.IO.Unsafe import Data.Bits +import Data.Int import Data.Time.Clock.POSIX import Data.Ratio import System.Posix.Internals -import Foreign import Foreign.C +import Foreign.ForeignPtr +import Foreign.Marshal +import Foreign.Ptr +import Foreign.Storable -- ----------------------------------------------------------------------------- -- POSIX file modes |