Proposal: Add Alternative adapter to Data.Monoid

[Mario Blažević]

> instance Alternative t => Monoid (Alt t a) where
>    mempty = Alt empty
>    (Alt m) `mappend` (Alt n) = Alt (m <|> n)

+1