-- | Produces an ExceptT e m a, in any monad m, given an Either e a.
exceptT :: Monad m => Either e a -> ExceptT e m a
exceptT e = rebase $ except e
exceptT :: Monad m => Either e a -> ExceptT e m a
exceptT e = rebase $ except e
exceptT e = rebase $ except e