Allow System.Posix.Internals to compile with nhc98 again.

[ghc-base.git] / System / Posix / Internals.hs

diff --git a/System/Posix/Internals.hs b/System/Posix/Internals.hs
index c4bb446..26a8a5b 100644 (file)
--- a/System/Posix/Internals.hs
+++ b/System/Posix/Internals.hs
@@ -56,6 +56,7 @@ import GHC.IO.Device
 import Hugs.Prelude (IOException(..), IOErrorType(..))
 import Hugs.IO (IOMode(..))
 #elif __NHC__
+import GHC.IO.Device   -- yes, I know, but its portable, really!
 import System.IO
 import Control.Exception
 import DIOError