diff --git a/Control/Applicative/Error.hs b/Control/Applicative/Error.hs
--- a/Control/Applicative/Error.hs
+++ b/Control/Applicative/Error.hs
@@ -20,6 +20,12 @@
    Failure msgs' <*> Success _ = Failure msgs'
    Success f <*> Success x = Success (f x)
 
+instance Alternative Failing where
+  empty                       = Failure []
+  (Success x) <|> _           = Success x
+  _           <|> (Success y) = Success y
+  (Failure x) <|> (Failure y) = Failure (x ++ y)
+
 maybeRead :: Read a => String -> Maybe a
 maybeRead s | [(i, "")] <- readsPrec 0 s = Just i
             | otherwise = Nothing
diff --git a/applicative-extras.cabal b/applicative-extras.cabal
--- a/applicative-extras.cabal
+++ b/applicative-extras.cabal
@@ -1,5 +1,5 @@
 Name:            applicative-extras
-Version:         0.1.5
+Version:         0.1.6
 Synopsis:        Instances for Applicative
 Description:     Some instances for applicative functors and type-level
                  composition. Forkable on github.
@@ -7,7 +7,7 @@
 Homepage:        http://github.com/chriseidhof/applicative-extras/
 License:         BSD3
 License-file:    LICENSE
-Author:          Chris Eidhof <ce+hackage@tupil.com>, Russel O'Connor
+Author:          Chris Eidhof <ce+hackage@tupil.com>, Russel O'Connor, Jeremy Shaw
 Maintainer:      Chris Eidhof <ce+hackage@tupil.com>
 Exposed-Modules:   Control.Applicative.Compose
                  , Control.Applicative.Error
