diff options
author | andy <unknown> | 2000-04-04 02:20:30 +0000 |
---|---|---|
committer | andy <unknown> | 2000-04-04 02:20:30 +0000 |
commit | e1b730fcfe9ba724d52a8574ceabb4ee7d491284 (patch) | |
tree | 51e23dc88fa6c4117cb9d1ba74c3099642ebe792 /ghc/lib/std/IO.lhs | |
parent | 039fce55118f6a18e5b5cba63ccdd0dfc341894d (diff) | |
download | haskell-e1b730fcfe9ba724d52a8574ceabb4ee7d491284.tar.gz |
[project @ 2000-04-04 02:20:30 by andy]
Using the new Prelude structure to handle prims.
Diffstat (limited to 'ghc/lib/std/IO.lhs')
-rw-r--r-- | ghc/lib/std/IO.lhs | 49 |
1 files changed, 23 insertions, 26 deletions
diff --git a/ghc/lib/std/IO.lhs b/ghc/lib/std/IO.lhs index 7ddeb03912..386d490c1a 100644 --- a/ghc/lib/std/IO.lhs +++ b/ghc/lib/std/IO.lhs @@ -87,32 +87,29 @@ module IO ( #ifdef __HUGS__ import Ix(Ix) -import Prelude -import privileged Prelude ( IORef - , unsafePerformIO - , prelCleanupAfterRunAction - , copy_String_to_cstring - , primIntToChar - , primWriteCharOffAddr - , nullAddr - , newIORef - , writeIORef - , readIORef - , nh_close - , nh_errno - , nh_stdin - , nh_stdout - , nh_stderr - , nh_flush - , nh_open - , nh_free - , nh_read - , nh_write - , nh_filesize - , nh_iseof - ) - - +import PrimPrel ( IORef + , unsafePerformIO + , prelCleanupAfterRunAction + , copy_String_to_cstring + , primIntToChar + , primWriteCharOffAddr + , nullAddr + , newIORef + , writeIORef + , readIORef + , nh_close + , nh_errno + , nh_stdin + , nh_stdout + , nh_stderr + , nh_flush + , nh_open + , nh_free + , nh_read + , nh_write + , nh_filesize + , nh_iseof + ) #else --import PrelST import PrelBase |