projects
/
ghc-base.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Hugs only: avoid dependency cycle
[ghc-base.git]
/
Foreign
/
C
/
Error.hs
diff --git
a/Foreign/C/Error.hs
b/Foreign/C/Error.hs
index
ac26141
..
dc450f3
100644
(file)
--- a/
Foreign/C/Error.hs
+++ b/
Foreign/C/Error.hs
@@
-118,6
+118,9
@@
import Data.Maybe
import GHC.IOBase
import GHC.Num
import GHC.Base
+#elif __HUGS__
+import Hugs.Prelude ( Handle, IOError, ioError )
+import System.IO.Unsafe ( unsafePerformIO )
#else
import System.IO ( Handle )
import System.IO.Error ( IOError, ioError )