From: Ian Lynagh <igloo@earth.li>
Date: Wed, 24 Nov 2010 23:06:55 +0000 (+0000)
Subject: Whitespace only
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=ada3dd2248d0308819fa9d3290f79a2a0d372db9

Whitespace only
---

diff --git a/compiler/rename/RnEnv.lhs b/compiler/rename/RnEnv.lhs
index 3587093..f112915 100644
--- a/compiler/rename/RnEnv.lhs
+++ b/compiler/rename/RnEnv.lhs
@@ -551,21 +551,21 @@ lookupBindGroupOcc :: Maybe NameSet  -- See notes on the (Maybe NameSet)
 --
 -- See Note [Looking up signature names]
 lookupBindGroupOcc mb_bound_names what rdr_name
-  = do	{ local_env <- getLocalRdrEnv
-	; case lookupLocalRdrEnv local_env rdr_name of 
-  	    Just n  -> check_local_name n
-  	    Nothing -> do	-- Not defined in a nested scope
+  = do  { local_env <- getLocalRdrEnv
+        ; case lookupLocalRdrEnv local_env rdr_name of 
+            Just n  -> check_local_name n
+            Nothing -> do       -- Not defined in a nested scope
 
         { env <- getGlobalRdrEnv 
-  	; let gres = lookupGlobalRdrEnv env (rdrNameOcc rdr_name)
-	; case (filter isLocalGRE gres) of
-	    (gre:_) -> check_local_name (gre_name gre)
-			-- If there is more than one local GRE for the 
-			-- same OccName 'f', that will be reported separately
-			-- as a duplicate top-level binding for 'f'
-	    [] | null gres -> bale_out_with empty
-	       | otherwise -> bale_out_with import_msg
-  	}}
+        ; let gres = lookupGlobalRdrEnv env (rdrNameOcc rdr_name)
+        ; case (filter isLocalGRE gres) of
+            (gre:_) -> check_local_name (gre_name gre)
+                        -- If there is more than one local GRE for the 
+                        -- same OccName 'f', that will be reported separately
+                        -- as a duplicate top-level binding for 'f'
+            [] | null gres -> bale_out_with empty
+               | otherwise -> bale_out_with import_msg
+        }}
     where
       check_local_name name 	-- The name is in scope, and not imported
   	  = case mb_bound_names of