Skip to content

Commit 01959d5

Browse files
committed
hls-graph: Internal.Types: treat MonadFail
1 parent 45b29b4 commit 01959d5

File tree

1 file changed

+3
-0
lines changed
  • hls-graph/src/Development/IDE/Graph/Internal

1 file changed

+3
-0
lines changed

hls-graph/src/Development/IDE/Graph/Internal/Types.hs

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -18,7 +18,10 @@ import Control.Monad.Catch
1818
-- Needed in GHC 8.6.5
1919
import Control.Concurrent.STM.Stats (TVar, atomically)
2020
#endif
21+
#if __GLASGOW_HASKELL__ < 880
22+
import Prelude hiding (MonadFail)
2123
import Control.Monad.Fail
24+
#endif
2225
import Control.Monad.IO.Class
2326
import Control.Monad.Trans.Reader
2427
import Data.Aeson (FromJSON, ToJSON)

0 commit comments

Comments
 (0)