[haddock @ 2003-07-28 14:32:42 by simonmar]

Update to avoid using hslibs with GHC >= 5.04

1 files changed, 11 insertions, 5 deletions

diff --git a/src/Main.hs b/src/Main.hs
index d1bd8e51..092c4861 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -20,9 +20,7 @@ import Binary
 import HsParser
 import HsParseMonad
 import HsSyn
-import GetOpt
 import System
-import FiniteMap
 
 --import Pretty
 
@@ -32,12 +30,20 @@ import Monad	( when )
 import Char	( isSpace )
 import IO
 
-#ifdef __GLASGOW_HASKELL__
+#if __GLASGOW_HASKELL__ < 503
+import MonadWriter
+import FiniteMap
+import GetOpt
 import IOExts
+#else
+import Control.Monad.Writer
+import Data.FiniteMap
+import System.Console.GetOpt
+import Data.IORef
+import Debug.Trace
+import System.IO.Unsafe	 ( unsafePerformIO )
 #endif
 
-import MonadWriter
-
 #if __GLASGOW_HASKELL__ < 500
 import Regex
 import PackedString