diff options
Diffstat (limited to 'ghc/InteractiveUI.hs')
| -rw-r--r-- | ghc/InteractiveUI.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index c0d5f19233..93275464e8 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -2180,7 +2180,7 @@ showBindings = do docs <- mapM makeDoc (reverse bindings) -- reverse so the new ones come last let idocs = map GHC.pprInstanceHdr insts - fidocs = map GHC.pprFamInstHdr finsts + fidocs = map GHC.pprFamInst finsts mapM_ printForUserPartWay (docs ++ idocs ++ fidocs) where makeDoc (AnId i) = pprTypeAndContents i |