From 2d2587182568cc5aa4b29d401517337c32459c66 Mon Sep 17 00:00:00 2001 From: Sylvain Henry Date: Tue, 21 Apr 2020 13:00:42 +0200 Subject: Module structure --- haddock-api/src/Haddock/Parser.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'haddock-api/src/Haddock/Parser.hs') 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 -- cgit v1.2.3