@@ -1,15 +1,20 @@
1{-# LANGUAGE CPP #-}
1{-# LANGUAGE CPP #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
3{-# LANGUAGE DeriveFunctor #-}
3{-# LANGUAGE DeriveFunctor #-}
4+#if !MIN_VERSION_base(4,8,0)
5+{-# LANGUAGE DeriveFoldable #-}
4{-# LANGUAGE DeriveTraversable #-}
7{-# LANGUAGE DeriveTraversable #-}
5{-# LANGUAGE TypeOperators #-}
8{-# LANGUAGE TypeOperators #-}
6{-# OPTIONS_HADDOCK not-home #-}
9{-# OPTIONS_HADDOCK not-home #-}
7module Servant.API.Alternative ((:<|>)(..)) where
10module Servant.API.Alternative ((:<|>)(..)) where
9#if !MIN_VERSION_base(4,8,0)
12#if !MIN_VERSION_base(4,8,0)
10−import Data.Monoid (Monoid (..))
13+import Data.Monoid (Monoid (..))
14+import Data.Traversable (Traversable)
15+import Data.Foldable (Foldable)
12−import Data.Typeable (Typeable)
17+import Data.Typeable (Typeable)
13-- | Union of two APIs, first takes precedence in case of overlap.
18-- | Union of two APIs, first takes precedence in case of overlap.
15-- Example:
20-- Example: