From: simonpj <unknown>
Date: Thu, 9 Jan 2003 16:15:30 +0000 (+0000)
Subject: [project @ 2003-01-09 16:15:30 by simonpj]
X-Git-Tag: Approx_11550_changesets_converted~1276
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=115843f29d16a6d212fc1f1b80a7c60c9e7ea587;p=ghc-hetmet.git

[project @ 2003-01-09 16:15:30 by simonpj]
Layout wibble
---

diff --git a/ghc/compiler/coreSyn/CorePrep.lhs b/ghc/compiler/coreSyn/CorePrep.lhs
index e55bca8..1565e55 100644
--- a/ghc/compiler/coreSyn/CorePrep.lhs
+++ b/ghc/compiler/coreSyn/CorePrep.lhs
@@ -626,7 +626,7 @@ tryEta bndrs expr@(App _ _)
     n_remaining = length args - length bndrs
 
     ok bndr (Var arg) = bndr == arg
-    ok bndr other	    = False
+    ok bndr other     = False
 
 	  -- we can't eta reduce something which must be saturated.
     ok_to_eta_reduce (Var f) = not (hasNoBinding f)