haskell - Control.Applicative.Lift 有什么用？

Question

我在最近的一篇博文中写到transformers，有人问“人们使用Control.Applicative.Lift做什么？” 我无法回答这个问题，所以我向 StackOverflow 回应了这个问题 - 有什么用 Control.Applicative.Lift？

我在包中看到了一个使用它的示例，但我似乎无法完全解析它的作用。有谁知道野外的任何其他例子？

Answer 1

Lift是一个相对较新的贡献：

data Lift f a = Pure a | Other (f a)

也就是说，给定一个 functor ，您可以通过与纯值f组合来获得一个新的 functor 。f

包本身给出了一个例子：

-- | An applicative functor that collects a monoid (e.g. lists) of errors.
-- A sequence of computations fails if any of its components do, but
-- unlike monads made with 'ErrorT' from "Control.Monad.Trans.Error",
-- these computations continue after an error, collecting all the errors.
type Errors e = Lift (Constant e)

-- | Report an error.
failure :: Monoid e => e -> Errors e a
failure e = Other (Constant e)

然而，我不知道这个的任何野外用途。