diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2007-11-07 16:16:12 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-11-07 16:16:12 +0000 |
| commit | 427f3443a432cde66da1e8dde94ef9c5351636da (patch) | |
| tree | 44be3e88c1219a384eaca646d31fa62f0dbf0e8d | |
| parent | e82fcf244b0bedb795afd7a50253031f73f88223 (diff) | |
| download | haskell-427f3443a432cde66da1e8dde94ef9c5351636da.tar.gz | |
FIX BUILD
Sorry, should have pushed with previous batch of changes.
| -rw-r--r-- | compiler/ghci/InteractiveUI.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/ghci/InteractiveUI.hs b/compiler/ghci/InteractiveUI.hs index 25ad9d8ba7..74310a340d 100644 --- a/compiler/ghci/InteractiveUI.hs +++ b/compiler/ghci/InteractiveUI.hs @@ -993,8 +993,8 @@ afterLoad ok session maybe_context = do Just (as,bs) -> do r <- io $ Exception.try (GHC.setContext session as bs) case r of - Left err -> setContextAfterLoad session loaded_mods - Right _ -> return () + Left _err -> setContextAfterLoad session loaded_mods + Right _ -> return () modulesLoadedMsg ok (map GHC.ms_mod_name loaded_mods) |