-l for ghc-modi info.

This commit is contained in:
Kazu Yamamoto
2014-04-21 09:45:41 +09:00
parent e09b406ee8
commit 756d17eaa2
2 changed files with 7 additions and 6 deletions

View File

@@ -38,17 +38,18 @@ infoExpr :: Options
-> Expression -- ^ A Haskell expression.
-> IO String
infoExpr opt cradle file expr = (++ "\n") <$> withGHCDummyFile
(inModuleContext opt cradle file (info file expr) "Cannot show info")
(inModuleContext opt cradle file (info opt file expr) "Cannot show info")
-- | Obtaining information of a target expression. (GHCi's info:)
info :: FilePath -- ^ A target file.
info :: Options
-> FilePath -- ^ A target file.
-> Expression -- ^ A Haskell expression.
-> Ghc String
info file expr = do
info opt file expr = do
void $ Gap.setCtx file
sdoc <- Gap.infoThing expr
(dflag, style) <- getFlagStyle
return $ showPage dflag style sdoc
return $ convert opt $ showPage dflag style sdoc
----------------------------------------------------------------