From 2613f676d0c6d16a92eaae00eb4cccad9504998e Mon Sep 17 00:00:00 2001
From: Daniel Gröber <dxld@darkboxed.org>
Date: Wed, 30 Jan 2019 20:56:39 +0100
Subject: Fix SomeException swallowing in compileWithCabalV2GhcEnv

---
 src/CabalHelper/Compiletime/Compile.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/CabalHelper')

diff --git a/src/CabalHelper/Compiletime/Compile.hs b/src/CabalHelper/Compiletime/Compile.hs
index 3bc959c..88ff51d 100644
--- a/src/CabalHelper/Compiletime/Compile.hs
+++ b/src/CabalHelper/Compiletime/Compile.hs
@@ -14,7 +14,7 @@
 -- You should have received a copy of the GNU General Public License
 -- along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-{-# LANGUAGE DeriveFunctor, GADTs #-}
+{-# LANGUAGE DeriveFunctor, GADTs, ScopedTypeVariables #-}
 
 {-|
 Module      : CabalHelper.Compiletime.Compile
@@ -225,7 +225,7 @@ compileHelper' CompHelperEnv {..} = do
        prepare env = do
          -- exists_in_env <- liftIO $ cabalVersionExistsInPkgDb cheCabalVer db
          void $ installCabalLibV2 ghcVer cheCabalVer env `E.catch`
-           \(SomeException _) ->
+           \(ex :: IOError) -> print ex >>
                case cheCabalVer of
                  CabalHEAD _ -> panicIO "Installing Cabal HEAD failed."
                  CabalVersion ver -> errorInstallCabal (CabalVersion ver)
-- 
cgit v1.2.3