From 5e6ccfbf21308edd6ff17a76ae981229ea3d12fd Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 26 Jul 2006 10:35:26 +0000 Subject: [PATCH] fix parse error (merge-o, I think) --- compiler/ghci/Linker.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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 { -- 1.7.10.4