diff options
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 16 |
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 |