[project @ 2002-08-08 06:25:05 by ross]

Add hTell to Hugs.

diff --git a/System/IO.hs b/System/IO.hs
index e25d422..1226fcc 100644 (file)
--- a/System/IO.hs
+++ b/System/IO.hs
@@ -35,9 +35,7 @@ module System.IO (
     hGetPosn,                 -- :: Handle -> IO HandlePosn
     hSetPosn,                 -- :: HandlePosn -> IO ()
     hSeek,                    -- :: Handle -> SeekMode -> Integer -> IO ()
-#ifndef __HUGS__
     hTell,                    -- :: Handle -> IO Integer
-#endif
     hWaitForInput,            -- :: Handle -> Int -> IO Bool
     hReady,                   -- :: Handle -> IO Bool
     hGetChar,                 -- :: Handle -> IO Char