aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Gröber <dxld@darkboxed.org>2019-01-30 20:56:39 +0100
committerDaniel Gröber <dxld@darkboxed.org>2019-01-30 20:56:39 +0100
commit2613f676d0c6d16a92eaae00eb4cccad9504998e (patch)
treea9500952b959a6f21974b0ede67b5e77a1e6f887
parent2c38147fe73cdca0f8e11387a7ee92b1506e99b9 (diff)
Fix SomeException swallowing in compileWithCabalV2GhcEnv
-rw-r--r--src/CabalHelper/Compiletime/Compile.hs4
1 files changed, 2 insertions, 2 deletions
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)