diff options
Diffstat (limited to 'compiler/ghci/Debugger.hs')
| -rw-r--r-- | compiler/ghci/Debugger.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/compiler/ghci/Debugger.hs b/compiler/ghci/Debugger.hs index 44cf6f3865..0ceffcdcf1 100644 --- a/compiler/ghci/Debugger.hs +++ b/compiler/ghci/Debugger.hs @@ -22,7 +22,8 @@ import Name import Var hiding ( varName ) import VarSet import UniqSupply -import TcType +import Type +import Kind import GHC import Outputable import PprTyThing @@ -207,7 +208,7 @@ pprTypeAndContents id = do dflags <- GHC.getSessionDynFlags let pefas = gopt Opt_PrintExplicitForalls dflags pcontents = gopt Opt_PrintBindContents dflags - pprdId = (pprTyThing pefas . AnId) id + pprdId = (PprTyThing.pprTyThing pefas . AnId) id if pcontents then do let depthBound = 100 |