[commit: haddock] wip-located-module-as, wip/T3384: ImportDecl.ideclAs now has a Located ModuleName (f4e355f)

git at git.haskell.org git at git.haskell.org
Tue Nov 28 11:48:19 UTC 2017


Repository : ssh://git@git.haskell.org/haddock

On branches: wip-located-module-as,wip/T3384
Link       : http://git.haskell.org/haddock.git/commitdiff/f4e355f7023057924161160ce75aeaaa3a8d9914

>---------------------------------------------------------------

commit f4e355f7023057924161160ce75aeaaa3a8d9914
Author: Alan Zimmerman <alan.zimm at gmail.com>
Date:   Thu Nov 3 14:08:10 2016 +0200

    ImportDecl.ideclAs now has a Located ModuleName


>---------------------------------------------------------------

f4e355f7023057924161160ce75aeaaa3a8d9914
 haddock-api/src/Haddock/Interface/Create.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/haddock-api/src/Haddock/Interface/Create.hs b/haddock-api/src/Haddock/Interface/Create.hs
index 2cdc6f8..627f7c9 100644
--- a/haddock-api/src/Haddock/Interface/Create.hs
+++ b/haddock-api/src/Haddock/Interface/Create.hs
@@ -164,7 +164,7 @@ mkAliasMap dflags mRenamedSource =
     Just (_,impDecls,_,_) ->
       M.fromList $
       mapMaybe (\(SrcLoc.L _ impDecl) -> do
-        alias <- ideclAs impDecl
+        SrcLoc.L _ alias <- ideclAs impDecl
         return $
           (lookupModuleDyn dflags
              (fmap Module.fsToUnitId $



More information about the ghc-commits mailing list