Get MonadFail from where it lives/lived before Prelude

src/Tahoe/SDMF/Internal/Converting.hs

@@ -7,6 +7,7 @@
 -}
 module Tahoe.SDMF.Internal.Converting where
 
+import Control.Monad.Fail (MonadFail)
 import Data.Int (Int64)
 import Data.Word (Word16, Word32, Word64, Word8)
 

src/Tahoe/SDMF/Internal/Encoding.hs

@@ -5,6 +5,7 @@
 -}
 module Tahoe.SDMF.Internal.Encoding where
 
+import Control.Monad.Fail (MonadFail)
 import Control.Monad (when)
 import Control.Monad.IO.Class (MonadIO (liftIO))
 import Crypto.Hash (digestFromByteString)

test/Spec.hs

@@ -8,6 +8,7 @@ import Hedgehog (
     tripping,
  )
 
+import Control.Monad.Fail (MonadFail)
 import Control.Monad (when)
 import Control.Monad.IO.Class (liftIO)
 import Crypto.Cipher.Types (makeIV)