@@ -1,15 +1,20 @@
11{-# LANGUAGE CPP #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveFunctor #-}
4+#if !MIN_VERSION_base(4,8,0)
5+{-# LANGUAGE DeriveFoldable #-}
6+#endif
47{-# LANGUAGE DeriveTraversable #-}
58{-# LANGUAGE TypeOperators #-}
69{-# OPTIONS_HADDOCK not-home #-}
710module Servant.API.Alternative ((:<|>)(..)) where
811
912#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)
1116#endif
12−import Data.Typeable (Typeable)
17+import Data.Typeable (Typeable)
1318-- | Union of two APIs, first takes precedence in case of overlap.
1419--
1520-- Example: