import SrcLoc (SrcSpan, )
import SysTools (initSysTools, )

import Data.Dynamic (Typeable, fromDynamic, )
import Data.IORef (newIORef, )


initGHC :: FilePath -> IO Session
initGHC pkgDir =
    do s <- newSession' CompManager (Just pkgDir)
       modifySessionDynFlags s (\dflags -> dflags{ hscTarget = HscInterpreted })
       return s

