Internal exports extra Monad stuff.

This commit is contained in:
Kazu Yamamoto 2014-07-18 15:42:05 +09:00
parent 30ddd655cd
commit 0080f9b68c
3 changed files with 26 additions and 4 deletions

View File

@ -28,8 +28,6 @@ module Language.Haskell.GhcMod (
, checkSyntax
, debugInfo
, expandTemplate
, findSymbol
, dumpSymbol
, info
, lint
, pkgDoc
@ -40,9 +38,11 @@ module Language.Haskell.GhcMod (
, modules
, languages
, flags
, findSymbol
, lookupSymbol
, dumpSymbol
-- * SymbolDb
, loadSymbolDb
, lookupSymbol
) where
import Language.Haskell.GhcMod.Boot

View File

@ -68,7 +68,8 @@ packageConfDir = "package.conf.d"
----------------------------------------------------------------
-- | Finding modules to which the symbol belong.
-- | Looking up 'SymbolDb' with 'Symbol' to \['ModuleString'\]
-- which will be concatenated. 'loadSymbolDb' is called internally.
findSymbol :: IOish m => Symbol -> GhcModT m String
findSymbol sym = liftIO loadSymbolDb >>= lookupSymbol sym

View File

@ -26,6 +26,26 @@ module Language.Haskell.GhcMod.Internal (
, withLogger
, setNoWaringFlags
, setAllWaringFlags
-- * Environment, state and logging
, GhcModEnv(..)
, newGhcModEnv
, GhcModState
, defaultState
, Mode(..)
, GhcModWriter
-- * Monad utilities
, runGhcMod
, runGhcModT'
, withErrorHandler
-- ** Conversion
, liftGhcMod
, toGhcModT
-- ** Accessing 'GhcModEnv' and 'GhcModState'
, options
, cradle
, getMode
, setMode
, withOptions
-- * 'Ghc' Choice
, (||>)
, goNext
@ -40,6 +60,7 @@ import Language.Haskell.GhcMod.CabalApi
import Language.Haskell.GhcMod.DynFlags
import Language.Haskell.GhcMod.GHCChoice
import Language.Haskell.GhcMod.Logger
import Language.Haskell.GhcMod.Monad
import Language.Haskell.GhcMod.Target
import Language.Haskell.GhcMod.Types