Cleff.Error

Effect

data Error e :: Effect where

An effect capable of breaking out of current control flow by raising an exceptional value e. This effect roughly corresponds to the MonadError typeclass and ExceptT monad transformer in mtl.

Constructors

ThrowError :: e -> Error e m a

CatchError :: m a -> (e -> m a) -> Error e m a

Operations

throwError :: Error e :> es => e -> Eff es a

catchError :: Error e :> es => Eff es a -> (e -> Eff es a) -> Eff es a

fromEither :: Error e :> es => Either e a -> Eff es a

Lift an Either value into the Error effect.

fromException :: forall e es a. (Exception e, '[Error e, IOE] :>> es) => IO a -> Eff es a

Lift exceptions generated by an IO computation into the Error effect.

fromExceptionVia :: (Exception ex, '[Error er, IOE] :>> es) => (ex -> er) -> IO a -> Eff es a

Like fromException, but allows to transform the exception into another error type.

fromExceptionEff :: forall e es a. (Exception e, '[Error e, IOE] :>> es) => Eff es a -> Eff es a

Lift exceptions generated by an Eff computation into the Error effect.

fromExceptionEffVia :: (Exception ex, '[Error er, IOE] :>> es) => (ex -> er) -> Eff es a -> Eff es a

Like fromExceptionEff, but allows to transform the exception into another error type.

note :: Error e :> es => e -> Maybe a -> Eff es a

Try to extract a value from Maybe, throw an error otherwise.

catchErrorJust :: Error e :> es => (e -> Maybe b) -> Eff es a -> (b -> Eff es a) -> Eff es a

A variant of catchError that allows a predicate to choose whether to catch (Just) or rethrow (Nothing) the error.

catchErrorIf :: Error e :> es => (e -> Bool) -> Eff es a -> (e -> Eff es a) -> Eff es a

A variant of catchError that allows a predicate to choose whether to catch (True) or rethrow (False) the error.

handleError :: Error e :> es => (e -> Eff es a) -> Eff es a -> Eff es a

Flipped version of catchError.

handleErrorJust :: Error e :> es => (e -> Maybe b) -> (b -> Eff es a) -> Eff es a -> Eff es a

Flipped version of catchErrorJust.

handleErrorIf :: Error e :> es => (e -> Bool) -> (e -> Eff es a) -> Eff es a -> Eff es a

Flipped version of catchErrorIf.

tryError :: Error e :> es => Eff es a -> Eff es (Either e a)

Runs a computation, returning a Left value if an error was thrown.

tryErrorJust :: Error e :> es => (e -> Maybe b) -> Eff es a -> Eff es (Either b a)

A variant of tryError that allows a predicate to choose whether to catch (True) or rethrow (False) the error.

Interpretations

runError :: forall e es a. Eff (Error e ': es) a -> Eff es (Either e a)

Run an Error effect.

Caveat: runError is implemented with Exceptions therefore inherits some of its unexpected behavoirs. Errors thrown in forked threads will not be directly caught by catchErrors in the parent thread. Instead it will incur an exception, and we won't be quite able to display the details of that exception properly at that point. Therefore please properly handle the errors in the forked threads separately.

However if you use async and wait for the action in the same effect scope (i.e. they get to be interpreted by the same runError handler), the error will be caught in the parent thread even if you don't deal with it in the forked thread. But if you passed the Async value out of the effect scope and waited for it elsewhere, the error will again not be caught. The best choice is not to pass Async values around randomly.

mapError :: forall e e' es. Error e' :> es => (e -> e') -> Eff (Error e ': es) ~> Eff es

Transform an Error into another. This is useful for aggregating multiple errors into one type.