Skip to content

Commit ec08e3e

Browse files
authored
fix import
1 parent 0ab63f0 commit ec08e3e

File tree

1 file changed

+5
-6
lines changed

1 file changed

+5
-6
lines changed

src/Control/Monad/Error/Class.purs

Lines changed: 5 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -7,8 +7,7 @@ import Prelude
77
import Data.Maybe (Maybe(..))
88
import Data.Either (Either(..), either)
99
import Effect (Effect)
10-
import Effect as Effect
11-
import Effect.Exception (Error)
10+
import Effect.Exception as Ex
1211

1312

1413
-- | The `MonadThrow` type class represents those monads which support errors via
@@ -81,11 +80,11 @@ instance monadErrorMaybe :: MonadError Unit Maybe where
8180
catchError Nothing f = f unit
8281
catchError (Just a) _ = Just a
8382

84-
instance monadThrowEffect :: MonadThrow Error Effect where
85-
throwError = Effect.throwException
83+
instance monadThrowEffect :: MonadThrow Ex.Error Effect where
84+
throwError = Ex.throwException
8685

87-
instance monadErrorEffect :: MonadError Error Effect where
88-
catchError = flip Effect.catchException
86+
instance monadErrorEffect :: MonadError Ex.Error Effect where
87+
catchError = flip Ex.catchException
8988

9089

9190
-- | Make sure that a resource is cleaned up in the event of an exception. The

0 commit comments

Comments
 (0)