From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 26 Jul 2006 10:35:26 +0000 (+0000)
Subject: fix parse error (merge-o, I think)
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=5e6ccfbf21308edd6ff17a76ae981229ea3d12fd;p=ghc-hetmet.git

fix parse error (merge-o, I think)
---

diff --git a/compiler/ghci/Linker.lhs b/compiler/ghci/Linker.lhs
index 26f40eb..15117fe 100644
--- a/compiler/ghci/Linker.lhs
+++ b/compiler/ghci/Linker.lhs
@@ -468,8 +468,8 @@ getLinkDeps hsc_env hpt pit maybe_normal_osuf span mods
 	     case mb_stuff of
 		  Found loc mod -> found loc mod
 		  _ -> no_obj mod_name
-
-    found loc mod = do {
+        where
+            found loc mod = do {
 		-- ...and then find the linkable for it
 	       mb_lnk <- findObjectLinkableMaybe mod loc ;
 	       case mb_lnk of {