[commit: ghc] wip/custom-type-errors: Change the rendering of user-defined type errors to `(TypeError ...)` (9204abc)

git at git.haskell.org git at git.haskell.org
Wed Nov 11 21:40:27 UTC 2015


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/custom-type-errors
Link       : http://ghc.haskell.org/trac/ghc/changeset/9204abc01073d7a11e8a094a56e7b9eebd56eae7/ghc

>---------------------------------------------------------------

commit 9204abc01073d7a11e8a094a56e7b9eebd56eae7
Author: Iavor S. Diatchki <diatchki at galois.com>
Date:   Wed Nov 11 13:39:50 2015 -0800

    Change the rendering of user-defined type errors to `(TypeError ...)`


>---------------------------------------------------------------

9204abc01073d7a11e8a094a56e7b9eebd56eae7
 compiler/types/TypeRep.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/types/TypeRep.hs b/compiler/types/TypeRep.hs
index c5bfec3..556435a 100644
--- a/compiler/types/TypeRep.hs
+++ b/compiler/types/TypeRep.hs
@@ -713,7 +713,7 @@ pprTyTcApp p tc tys
     if gopt Opt_PrintExplicitKinds dflags then pprTcApp  p ppr_type tc tys
                                    else pprTyList p ty1 ty2
 
-  | tc `hasKey` errorMessageTypeErrorFamKey = text "(type error)"
+  | tc `hasKey` errorMessageTypeErrorFamKey = text "(TypeError ...)"
 
   | otherwise
   = pprTcApp p ppr_type tc tys



More information about the ghc-commits mailing list