diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-04-21 13:00:42 +0200 |
|---|---|---|
| committer | Sylvain Henry <sylvain@haskus.fr> | 2020-04-24 15:46:05 +0200 |
| commit | 2d2587182568cc5aa4b29d401517337c32459c66 (patch) | |
| tree | 1cc57abaaa39c4523822f95ffb9c61156f1f28e4 /haddock-api/src/Haddock/Parser.hs | |
| parent | da4e2bd788b6231494d6ac56a8e88bcfa4be51f6 (diff) | |
Module structure
Diffstat (limited to 'haddock-api/src/Haddock/Parser.hs')
| -rw-r--r-- | haddock-api/src/Haddock/Parser.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/haddock-api/src/Haddock/Parser.hs b/haddock-api/src/Haddock/Parser.hs index cf66cd1a..e1b5c787 100644 --- a/haddock-api/src/Haddock/Parser.hs +++ b/haddock-api/src/Haddock/Parser.hs @@ -17,12 +17,12 @@ import qualified Documentation.Haddock.Parser as P import Documentation.Haddock.Types import GHC.Driver.Session ( DynFlags ) -import FastString ( fsLit ) +import GHC.Data.FastString ( fsLit ) import GHC.Parser.Lexer ( mkPState, unP, ParseResult(POk) ) import GHC.Parser ( parseIdentifier ) import GHC.Types.Name.Reader ( RdrName ) import GHC.Types.SrcLoc ( mkRealSrcLoc, unLoc ) -import StringBuffer ( stringToStringBuffer ) +import GHC.Data.StringBuffer ( stringToStringBuffer ) parseParas :: DynFlags -> Maybe Package -> String -> MetaDoc mod RdrName parseParas d p = overDoc (P.overIdentifier (parseIdent d)) . P.parseParas p |