import InteractiveEval
#endif
+import HscMain
+import DriverPipeline
import GhcMonad
-import TcIface
+import TcIface ( typecheckIface )
import TcRnTypes
import TcRnMonad ( initIfaceCheck )
import Packages
import SrcLoc
import CoreSyn ( CoreBind )
import TidyPgm
-import DriverPipeline
-import DriverPhases ( Phase(..), isHaskellSrcFilename, startPhase )
+import DriverPhases ( Phase(..), isHaskellSrcFilename, startPhase )
import HeaderInfo
import Finder
-import HscMain
import HscTypes
import DynFlags
import StaticFlagParser
import Data.IORef
import System.FilePath
import System.IO
-import System.IO.Error ( try, isDoesNotExistError )
+import System.IO.Error ( isDoesNotExistError )
import Prelude hiding (init)
case maybe_buf of
Just (_,t) -> check_timestamp old_summary location src_fn t
Nothing -> do
- m <- System.IO.Error.try (getModificationTime src_fn)
+ m <- tryIO (getModificationTime src_fn)
case m of
Right t -> check_timestamp old_summary location src_fn t
Left e | isDoesNotExistError e -> find_it