{-# OPTIONS -fno-warn-incomplete-patterns -optc-DNON_POSIX_SOURCE #-}
-----------------------------------------------------------------------------
--- $Id: Main.hs,v 1.95 2002/03/04 14:40:54 simonmar Exp $
+-- $Id: Main.hs,v 1.97 2002/03/05 11:22:44 simonmar Exp $
--
-- GHC Driver program
--
import IO
import Directory ( doesFileExist )
import IOExts ( readIORef, writeIORef )
-import Exception ( throwDyn, Exception(..) )
+import Exception ( throwDyn, Exception(..),
+ AsyncException(StackOverflow) )
import System ( getArgs, exitWith, ExitCode(..) )
import Monad
import List