diff options
author | David Waern <david.waern@gmail.com> | 2011-10-01 01:56:48 +0200 |
---|---|---|
committer | David Waern <david.waern@gmail.com> | 2011-10-01 01:56:48 +0200 |
commit | a26a25d047f68051f9e1419a0cec515b62ad7e21 (patch) | |
tree | f93f0f390ed3ac6a704cd614685b249736f15c14 /src/Main.hs | |
parent | 64c6e2464fb3a9207e01b01a17c815284e49808b (diff) | |
parent | b50695a86358fd02b9a0ececbc107bf5274d5f95 (diff) |
Merge branch 'development'
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index b49fc6e4..f21bde5e 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -157,7 +157,7 @@ readPackagesAndProcessModules flags files = do -- Catches all GHC source errors, then prints and re-throws them. let handleSrcErrors action' = flip handleSourceError action' $ \err -> do - printExceptionAndWarnings err + printException err liftIO exitFailure -- Initialize GHC. |