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/Compiletime')
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