[project @ 2000-03-17 15:00:25 by simonmar]

don't export non-std stuff.

diff --git a/ghc/lib/std/IO.lhs b/ghc/lib/std/IO.lhs
index a1af357..67a491f 100644 (file)
--- a/ghc/lib/std/IO.lhs
+++ b/ghc/lib/std/IO.lhs
@@ -83,13 +83,6 @@ module IO (
     readIO,                   -- :: Read a => String -> IO a
     readLn,                   -- :: Read a => IO a
 
-#ifndef __HUGS__
-    -- extensions
-    hPutBuf,
-    hPutBufBA,
-#endif
-    slurpFile
-
   ) where
 
 #ifdef __HUGS__