From 57983d166965f3eb275ca7beebfc1162ef4e89c6 Mon Sep 17 00:00:00 2001 From: simonpj Date: Fri, 25 Feb 2005 13:57:05 +0000 Subject: [PATCH] [project @ 2005-02-25 13:57:05 by simonpj] Wibble to last commit --- 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 5db9c0a..8b1fed0 100644 --- a/ghc/compiler/typecheck/TcSimplify.lhs +++ b/ghc/compiler/typecheck/TcSimplify.lhs @@ -2395,7 +2395,7 @@ addNoInstanceErrs mb_what givens dicts -- Exclude implicit parameters, and tyvar dicts add_ors :: [SDoc] -> [SDoc] -- The empty case should not happen - add_ors [] = ptext SLIT("[No suggested fixes]") -- Strange + add_ors [] = [ptext SLIT("[No suggested fixes]")] -- Strange add_ors (f1:fs) = f1 : map (ptext SLIT("or") <+>) fs addTopAmbigErrs dicts -- 1.7.10.4