From d2655be31a282573d45aadcae1d8d7456bfde7a0 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Tue, 21 Dec 2004 12:14:31 +0000
Subject: [PATCH] [project @ 2004-12-21 12:14:31 by simonpj] Remove debug
 output

---
 ghc/compiler/typecheck/TcSimplify.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/typecheck/TcSimplify.lhs b/ghc/compiler/typecheck/TcSimplify.lhs
index 98f89d3..ee3927d 100644
--- a/ghc/compiler/typecheck/TcSimplify.lhs
+++ b/ghc/compiler/typecheck/TcSimplify.lhs
@@ -2302,7 +2302,7 @@ addNoInstanceErrs mb_what givens dicts
       = vcat [	addInstLoc [dict] ((ptext SLIT("Overlapping instances for") 
 					<+> pprPred (dictPred dict))),
     		sep [ptext SLIT("Matching instances") <> colon,
-    		     nest 2 (vcat [pprDFuns dfuns, text "---", pprDFuns unifiers])],
+    		     nest 2 (vcat [pprDFuns dfuns, pprDFuns unifiers])],
 		ASSERT( not (null matches) )
 		if not (isSingleton matches)
     		then 	-- Two or more matches
-- 
1.7.10.4