[project @ 2003-08-01 15:56:11 by panne]

[ghc-base.git] / System / IO.hs

diff --git a/System/IO.hs b/System/IO.hs
index 2e7bdd0..f936a56 100644 (file)
--- a/System/IO.hs
+++ b/System/IO.hs
@@ -104,6 +104,10 @@ module System.IO (
 
     hIsTerminalDevice,         -- :: Handle -> IO Bool
 #endif
+
+#ifdef __GLASGOW_HASKELL__
+    hShow,                     -- :: Handle -> IO String
+#endif
   ) where
 
 #ifdef __GLASGOW_HASKELL__