aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock/Backends
diff options
context:
space:
mode:
authorAlec Theriault <alec.theriault@gmail.com>2020-03-22 20:10:52 -0400
committerAlec Theriault <alec.theriault@gmail.com>2020-03-22 20:10:52 -0400
commit03dbfdd70186e484135ba1ea8d27672264cd9712 (patch)
treef2576a9a7e11581892fd8eeece69b0d257f4c1cd /haddock-api/src/Haddock/Backends
parentd576b2327e2bc117f912fe0a9d595e9ae62614e0 (diff)
Tentative 2.24 release
Adjusted changelogs and versions in `.cabal` files in preparation for the upcoming release bundled with GHC 8.10.
Diffstat (limited to 'haddock-api/src/Haddock/Backends')
-rw-r--r--haddock-api/src/Haddock/Backends/Hoogle.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hoogle.hs b/haddock-api/src/Haddock/Backends/Hoogle.hs
index b38d4047..b4a605f2 100644
--- a/haddock-api/src/Haddock/Backends/Hoogle.hs
+++ b/haddock-api/src/Haddock/Backends/Hoogle.hs
@@ -260,7 +260,7 @@ ppCtor dflags dat subdocs con@ConDeclH98 {}
tyVarBndr2Type :: HsTyVarBndr GhcRn -> HsType GhcRn
tyVarBndr2Type (UserTyVar _ n) = HsTyVar noExtField NotPromoted n
tyVarBndr2Type (KindedTyVar _ n k) = HsKindSig noExtField (reL (HsTyVar noExtField NotPromoted n)) k
- tyVarBndr2Type (XTyVarBndr _) = panic "haddock:ppCtor"
+ tyVarBndr2Type (XTyVarBndr nec) = noExtCon nec
ppCtor dflags _dat subdocs con@(ConDeclGADT { })
= concatMap (lookupCon dflags subdocs) (getConNames con) ++ f