[commit: haddock] T6018-injective-type-families, adamse-D1033, ghc-head, master, wip/10268, wip/10313, wip/D538, wip/D538-1, wip/D538-2, wip/D538-3, wip/D538-4, wip/D538-5, wip/D538-6, wip/D548-master, wip/D548-master-2, wip/T10483, wip/T9840, wip/api-annot-tweaks-7.10, wip/api-annots-ghc-7.10-3, wip/orf-reboot: Remove redundant wild-card pattern match (b4b82e8)

git at git.haskell.org git at git.haskell.org
Wed Jul 8 08:35:00 UTC 2015


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

On branches: T6018-injective-type-families,adamse-D1033,ghc-head,master,wip/10268,wip/10313,wip/D538,wip/D538-1,wip/D538-2,wip/D538-3,wip/D538-4,wip/D538-5,wip/D538-6,wip/D548-master,wip/D548-master-2,wip/T10483,wip/T9840,wip/api-annot-tweaks-7.10,wip/api-annots-ghc-7.10-3,wip/orf-reboot
Link       : http://git.haskell.org/haddock.git/commitdiff/b4b82e84099196ff22762e90922aea48671781a2

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

commit b4b82e84099196ff22762e90922aea48671781a2
Author: Herbert Valerio Riedel <hvr at gnu.org>
Date:   Sun Dec 14 10:11:47 2014 +0100

    Remove redundant wild-card pattern match
    
    (this would otherwise cause a build-failure with `-Werror`)


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

b4b82e84099196ff22762e90922aea48671781a2
 haddock-api/src/Haddock/Convert.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/haddock-api/src/Haddock/Convert.hs b/haddock-api/src/Haddock/Convert.hs
index 3a77eca..1b1a8a8 100644
--- a/haddock-api/src/Haddock/Convert.hs
+++ b/haddock-api/src/Haddock/Convert.hs
@@ -173,7 +173,6 @@ synifyTyCon coax tc
                   (brListMap (noLoc . synifyAxBranch tc) branches)
               BuiltInSynFamTyCon {} -> return $ ClosedTypeFamily []
               AbstractClosedSynFamilyTyCon {} -> return $ ClosedTypeFamily []
-              _ -> Left "synifyTyCon: type/data family confusion"
         in info >>= \i ->
            return (FamDecl
                    (FamilyDecl { fdInfo = i



More information about the ghc-commits mailing list