Add instance Alternative (Either e)

[Dannyu NDos]

instance Monoid e => Alternative (Either e) where
    empty = left mempty
    Left x <|> Left y = Left (x <> y)
    Left _ <|> y = y
    x <|> _ = x

Leftmost Right is returned for sake of consistence with Semigroup instance.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/libraries/attachments/20190807/44f1ab43/attachment.html>