[project @ 2001-05-03 09:01:29 by simonpj]

Wibble

diff --git a/ghc/compiler/typecheck/TcBinds.lhs b/ghc/compiler/typecheck/TcBinds.lhs
index a50bc50..1192ef3 100644 (file)
--- a/ghc/compiler/typecheck/TcBinds.lhs
+++ b/ghc/compiler/typecheck/TcBinds.lhs
@@ -416,8 +416,7 @@ generalise_help doc tau_tvs lie_req sigs
 -----------------------
   | null sigs
   =    -- INFERENCE CASE: Unrestricted group, no type signatures
-    tcSimplifyInfer doc
-                   tau_tvs lie_req
+    tcSimplifyInfer doc tau_tvs lie_req
 
 -----------------------
   | otherwise