[commit: haddock] wip/T9840: Handle EmptyClosedSynFamilyTyCon introduced in fix to #9840 (593a775)
git at git.haskell.org
git at git.haskell.org
Wed Jul 8 08:38:18 UTC 2015
Repository : ssh://git@git.haskell.org/haddock
On branch : wip/T9840
Link : http://git.haskell.org/haddock.git/commitdiff/593a7759606da4c6b7bfeeb91934e6552259792d
>---------------------------------------------------------------
commit 593a7759606da4c6b7bfeeb91934e6552259792d
Author: Adam Gundry <adam at well-typed.com>
Date: Wed Apr 15 12:48:03 2015 +0100
Handle EmptyClosedSynFamilyTyCon introduced in fix to #9840
>---------------------------------------------------------------
593a7759606da4c6b7bfeeb91934e6552259792d
haddock-api/src/Haddock/Convert.hs | 1 +
1 file changed, 1 insertion(+)
diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs
index 8317322..ac477c8 100644
--- a/haddock-api/src/Haddock/Convert.hs
+++ b/haddock-api/src/Haddock/Convert.hs
@@ -173,6 +173,7 @@ synifyTyCon coax tc
(brListMap (noLoc . synifyAxBranch tc) branches)
BuiltInSynFamTyCon {} -> return $ ClosedTypeFamily []
AbstractClosedSynFamilyTyCon {} -> return $ ClosedTypeFamily []
+ EmptyClosedSynFamilyTyCon {} -> return $ ClosedTypeFamily []
in info >>= \i ->
return (FamDecl
(FamilyDecl { fdInfo = i
More information about the ghc-commits
mailing list