@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
12{-# LANGUAGE DeriveDataTypeable #-}
23{-# LANGUAGE DeriveGeneric #-}
34{-# LANGUAGE FlexibleInstances #-}
@@ -16,6 +17,9 @@
1617-- >>> type EgDefault = Get '[CSV] [(Int, String)]
1718module Servant.CSV.Cassava where
1819
20+#if !MIN_VERSION_base(4,8,0)
21+import Control.Applicative ((<$>))
22+#endif
1923import Data.Csv
2024import Data.Proxy (Proxy (..))
2125import Data.Typeable (Typeable)