hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

prevent exitFailure.

Browse Source
This commit is contained in:
Kazu Yamamoto 2012-06-04 15:40:26 +09:00
parent 111058562a
commit a40f293d43
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
GHCApi.hs
View File

@ -21,8 +21,9 @@ withGHC body = ghandle ignore $ runGhc (Just libdir) $ do
where where
ignore :: Alternative m => SomeException -> IO (m a) ignore :: Alternative m => SomeException -> IO (m a)
ignore e = do ignore e = do
hPutStr stderr "Dummy:0:0:Error:"
hPrint stderr e hPrint stderr e
exitFailure exitSuccess
---------------------------------------------------------------- ----------------------------------------------------------------