git.iko.soy/typeable/servant
on master help sign in
Conditionally include Control.Applicative <$>
130fd27Luke Clifton
servant-cassava/src/Servant/CSV/Cassava.hs+4
@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE FlexibleInstances #-}
4{-# LANGUAGE FlexibleInstances #-}
@@ -16,6 +17,9 @@
16-- >>> type EgDefault = Get '[CSV] [(Int, String)]
17-- >>> type EgDefault = Get '[CSV] [(Int, String)]
17module Servant.CSV.Cassava where
18module Servant.CSV.Cassava where
18
19
20+#if !MIN_VERSION_base(4,8,0)
21+import Control.Applicative ((<$>))
22+#endif
19import Data.Csv
23import Data.Csv
20import Data.Proxy (Proxy (..))
24import Data.Proxy (Proxy (..))
21import Data.Typeable (Typeable)
25import Data.Typeable (Typeable)