[project @ 2005-01-05 21:30:05 by krasimir]

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

diff --git a/System/IO.hs b/System/IO.hs
index f94dca6..b47bb42 100644 (file)
--- a/System/IO.hs
+++ b/System/IO.hs
@@ -57,9 +57,12 @@ module System.IO (
 
     -- * Operations on handles
 
-    -- ** Determining the size of a file
+    -- ** Determining and changing the size of a file
 
     hFileSize,                -- :: Handle -> IO Integer
+#ifdef __GLASGOW_HASKELL__
+    hSetFileSize,              -- :: Handle -> Integer -> IO ()
+#endif
 
     -- ** Detecting the end of input