[commit: haddock] wip/ttg3-2017-11-12: SourceTextX has been removed from GHC (23b459d)
git at git.haskell.org
git at git.haskell.org
Mon Nov 20 21:12:25 UTC 2017
Repository : ssh://git@git.haskell.org/haddock
On branch : wip/ttg3-2017-11-12
Link : http://git.haskell.org/haddock.git/commitdiff/23b459d564044b9c8db76ac74bbe1580cb45c634
>---------------------------------------------------------------
commit 23b459d564044b9c8db76ac74bbe1580cb45c634
Author: Alan Zimmerman <alan.zimm at gmail.com>
Date: Mon Nov 13 21:37:58 2017 +0200
SourceTextX has been removed from GHC
>---------------------------------------------------------------
23b459d564044b9c8db76ac74bbe1580cb45c634
haddock-api/src/Haddock/Backends/Hoogle.hs | 2 +-
haddock-api/src/Haddock/Types.hs | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/haddock-api/src/Haddock/Backends/Hoogle.hs b/haddock-api/src/Haddock/Backends/Hoogle.hs
index 5707d45..1cd9e2b 100644
--- a/haddock-api/src/Haddock/Backends/Hoogle.hs
+++ b/haddock-api/src/Haddock/Backends/Hoogle.hs
@@ -87,7 +87,7 @@ dropHsDocTy = f
f (HsDocTy _ a _) = f $ unL a
f x = x
-outHsType :: (SourceTextX (GhcPass a), OutputableBndrId (GhcPass a))
+outHsType :: (OutputableBndrId (GhcPass a))
=> DynFlags -> HsType (GhcPass a) -> String
outHsType dflags = out dflags . dropHsDocTy
diff --git a/haddock-api/src/Haddock/Types.hs b/haddock-api/src/Haddock/Types.hs
index 265c939..9184d35 100644
--- a/haddock-api/src/Haddock/Types.hs
+++ b/haddock-api/src/Haddock/Types.hs
@@ -349,7 +349,7 @@ data InstType name
| TypeInst (Maybe (HsType name)) -- ^ Body (right-hand side)
| DataInst (TyClDecl name) -- ^ Data constructors
-instance (SourceTextX (GhcPass a), OutputableBndrId (GhcPass a))
+instance (OutputableBndrId (GhcPass a))
=> Outputable (InstType (GhcPass a)) where
ppr (ClassInst { .. }) = text "ClassInst"
<+> ppr clsiCtx
More information about the ghc-commits
mailing list