diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2020-04-24 08:45:25 +0100 |
|---|---|---|
| committer | Matthew Pickering <matthewtpickering@gmail.com> | 2020-04-24 08:45:25 +0100 |
| commit | 00a8ad780165bceca2e4268f67efe0667e5922bf (patch) | |
| tree | 187170227b9b4ecf391e30d2020ef219d0437e3c /compiler/GHC/Driver/MakeFile.hs | |
| parent | eaed0a3289e4c24ff1a70c6fc4b7f8bae6cd2dd3 (diff) | |
| download | haskell-wip/open-telemetry.tar.gz | |
Open telemwip/open-telemetry
Diffstat (limited to 'compiler/GHC/Driver/MakeFile.hs')
| -rw-r--r-- | compiler/GHC/Driver/MakeFile.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/Driver/MakeFile.hs b/compiler/GHC/Driver/MakeFile.hs index d45b39e3b3..20fc72ec02 100644 --- a/compiler/GHC/Driver/MakeFile.hs +++ b/compiler/GHC/Driver/MakeFile.hs @@ -44,6 +44,7 @@ import System.IO.Error ( isEOFError ) import Control.Monad ( when ) import Data.Maybe ( isJust ) import Data.IORef +import Control.Monad.Catch import qualified Data.Set as Set ----------------------------------------------------------------- @@ -52,7 +53,7 @@ import qualified Data.Set as Set -- ----------------------------------------------------------------- -doMkDependHS :: GhcMonad m => [FilePath] -> m () +doMkDependHS :: (MonadMask m ,GhcMonad m) => [FilePath] -> m () doMkDependHS srcs = do -- Initialisation dflags0 <- GHC.getSessionDynFlags |