summaryrefslogtreecommitdiff
path: root/ghc/lib/std/IO.lhs
diff options
context:
space:
mode:
authorandy <unknown>2000-04-04 02:20:30 +0000
committerandy <unknown>2000-04-04 02:20:30 +0000
commite1b730fcfe9ba724d52a8574ceabb4ee7d491284 (patch)
tree51e23dc88fa6c4117cb9d1ba74c3099642ebe792 /ghc/lib/std/IO.lhs
parent039fce55118f6a18e5b5cba63ccdd0dfc341894d (diff)
downloadhaskell-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.lhs49
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