[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