diff --git a/GHCApi.hs b/GHCApi.hs
--- a/GHCApi.hs
+++ b/GHCApi.hs
@@ -1,13 +1,15 @@
 module GHCApi where
 
-import Control.Exception
 import Control.Applicative
+import Control.Exception
 import CoreMonad
 import DynFlags
 import ErrMsg
 import Exception
 import GHC
 import GHC.Paths (libdir)
+import System.Exit
+import System.IO
 import Types
 
 ----------------------------------------------------------------
@@ -18,7 +20,9 @@
     defaultCleanupHandler dflags body
   where
     ignore :: Alternative m => SomeException -> IO (m a)
-    ignore _ = return empty
+    ignore e = do
+        hPrint stderr e
+        exitFailure
 
 ----------------------------------------------------------------
 
diff --git a/elisp/ghc.el b/elisp/ghc.el
--- a/elisp/ghc.el
+++ b/elisp/ghc.el
@@ -16,7 +16,7 @@
 
 ;;; Code:
 
-(defconst ghc-version "1.10.13")
+(defconst ghc-version "1.10.14")
 
 ;; (eval-when-compile
 ;;  (require 'haskell-mode))
diff --git a/ghc-mod.cabal b/ghc-mod.cabal
--- a/ghc-mod.cabal
+++ b/ghc-mod.cabal
@@ -1,5 +1,5 @@
 Name:                   ghc-mod
-Version:                1.10.13
+Version:                1.10.14
 Author:                 Kazu Yamamoto <kazu@iij.ad.jp>
 Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp>
 License:                BSD3
