From 225db1321a337b948a0ade821db81df6e79f1355 Mon Sep 17 00:00:00 2001 From: sof <unknown> Date: Fri, 14 Aug 1998 17:40:00 +0000 Subject: [PATCH] [project @ 1998-08-14 17:40:00 by sof] Clean up PrelIOBase import lists some more --- ghc/compiler/utils/StringBuffer.lhs | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/ghc/compiler/utils/StringBuffer.lhs b/ghc/compiler/utils/StringBuffer.lhs index d1fc13d3f750..4eca5d8cbcc2 100644 --- a/ghc/compiler/utils/StringBuffer.lhs +++ b/ghc/compiler/utils/StringBuffer.lhs @@ -63,22 +63,22 @@ import GlaExts import Addr ( Addr(..) ) import Foreign import ST -import IO ( openFile, hFileSize, hClose, IOMode(..) + #if __GLASGOW_HASKELL__ >= 303 - , slurpFile +import IO ( slurpFile ) +#else +import IO ( openFile, hFileSize, hClose, IOMode(..) ) #endif - ) + #if __GLASGOW_HASKELL__ < 301 import IOBase ( IOError(..), IOErrorType(..) ) import IOHandle ( readHandle, writeHandle, filePtr ) import PackBase ( unpackCStringBA ) #else -import PrelIOBase ( IOError(..), IOErrorType(..) -#if __GLASGOW_HASKELL__ <= 302 - , haFO__ -#endif - ) +# if __GLASGOW_HASKELL__ <= 302 +import PrelIOBase ( IOError(..), IOErrorType(..) ) import PrelHandle ( readHandle, writeHandle ) +# endif import PrelPack ( unpackCStringBA ) #endif -- GitLab