[project @ 1998-08-14 16:44:55 by sof]

Some more cpp'ery

diff --git a/ghc/compiler/utils/StringBuffer.lhs b/ghc/compiler/utils/StringBuffer.lhs
index 0fdaa47..d1fc13d 100644 (file)
--- a/ghc/compiler/utils/StringBuffer.lhs
+++ b/ghc/compiler/utils/StringBuffer.lhs
@@ -73,7 +73,11 @@ import IOBase                ( IOError(..), IOErrorType(..) )
 import IOHandle                ( readHandle, writeHandle, filePtr )
 import PackBase        ( unpackCStringBA )
 #else
-import PrelIOBase      ( IOError(..), IOErrorType(..), haFO__ )
+import PrelIOBase      ( IOError(..), IOErrorType(..)
+#if __GLASGOW_HASKELL__ <= 302
+                       , haFO__
+#endif
+                       )
 import PrelHandle      ( readHandle, writeHandle )
 import PrelPack                ( unpackCStringBA )
 #endif