Fix a bunch of relate exception handling problems

should handle exceptions outside of runGmlT otherwise we don't catch ghc
load related ones.
This commit is contained in:
Daniel Gröber
2015-03-09 22:04:04 +01:00
parent 7d7f848afb
commit 539c294dd4
8 changed files with 41 additions and 42 deletions

View File

@@ -46,7 +46,7 @@ splits :: IOish m
-> Int -- ^ Column number.
-> GhcModT m String
splits file lineNo colNo =
runGmLoadedT' [Left file] deferErrors $ ghandle handler $ do
ghandle handler $ runGmlT' [Left file] deferErrors $ do
opt <- options
crdl <- cradle
style <- getStyle