on master help sign in
fix build on 7.8
248033aAlp Mestanogullari
servant-mock/src/Servant/Mock.hs+4
@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
1{-# LANGUAGE DataKinds #-}
2{-# LANGUAGE DataKinds #-}
2{-# LANGUAGE TypeFamilies #-}
3{-# LANGUAGE TypeFamilies #-}
3{-# LANGUAGE TypeOperators #-}
4{-# LANGUAGE TypeOperators #-}
@@ -6,6 +7,9 @@
6{-# LANGUAGE ScopedTypeVariables #-}
7{-# LANGUAGE ScopedTypeVariables #-}
7module Servant.Mock ( HasMock(..) ) where
8module Servant.Mock ( HasMock(..) ) where
8
9
10+#if !MIN_VERSION_base(4,8,0)
11+import Control.Applicative ((<$>))
12+#endif
9import Control.Monad.IO.Class
13import Control.Monad.IO.Class
10import Data.ByteString.Lazy.Char8 (pack)
14import Data.ByteString.Lazy.Char8 (pack)
11import Data.Proxy
15import Data.Proxy