From b279a3fc517ee355844223758ef026e108535e57 Mon Sep 17 00:00:00 2001 From: "simonpj@microsoft.com" Date: Mon, 29 Oct 2007 16:26:37 +0000 Subject: [PATCH] Improve error-message output slightly --- compiler/typecheck/TcType.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/typecheck/TcType.lhs b/compiler/typecheck/TcType.lhs index e96fdd4..636ee0e 100644 --- a/compiler/typecheck/TcType.lhs +++ b/compiler/typecheck/TcType.lhs @@ -457,7 +457,7 @@ pprSkolTvBinding tv ppr_details (MetaTv (SigTv info) _) = ppr_skol info ppr_details (SkolemTv info) = ppr_skol info - ppr_skol UnkSkol = empty -- Unhelpful; omit + ppr_skol UnkSkol = ptext SLIT("is an unknown type variable") -- Unhelpful ppr_skol RuntimeUnkSkol = ptext SLIT("is an unknown runtime type") ppr_skol info = sep [ptext SLIT("is a rigid type variable bound by"), sep [pprSkolInfo info, -- 1.7.10.4