This commit is contained in:
Kazu Yamamoto 2014-04-30 10:51:34 +09:00
parent 186485577d
commit 14f5768c90
2 changed files with 3 additions and 3 deletions

View File

@ -10,13 +10,13 @@ import Language.Haskell.GhcMod.Lang
import Language.Haskell.GhcMod.List
import Language.Haskell.GhcMod.Types
-- | Print necessary information for front-end booting.
-- | Printing necessary information for front-end booting.
bootInfo :: Options -> Cradle -> IO String
bootInfo opt cradle = withGHC' $ do
initializeFlagsWithCradle opt cradle
boot opt
-- | Print necessary information for front-end booting.
-- | Printing necessary information for front-end booting.
boot :: Options -> Ghc String
boot opt = do
mods <- modules opt

View File

@ -30,7 +30,7 @@ type Symbol = String
-- | Database from 'Symbol' to modules.
newtype SymMdlDb = SymMdlDb (Map Symbol [ModuleString])
-- | Find modules to which the symbol belong.
-- | Finding modules to which the symbol belong.
findSymbol :: Options -> Cradle -> Symbol -> IO String
findSymbol opt cradle sym = withGHC' $ do
initializeFlagsWithCradle opt cradle