@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
12{-# LANGUAGE DataKinds #-}
23{-# LANGUAGE TypeFamilies #-}
34{-# LANGUAGE TypeOperators #-}
@@ -6,6 +7,9 @@
67{-# LANGUAGE ScopedTypeVariables #-}
78module Servant.Mock ( HasMock(..) ) where
89
10+#if !MIN_VERSION_base(4,8,0)
11+import Control.Applicative ((<$>))
12+#endif
913import Control.Monad.IO.Class
1014import Data.ByteString.Lazy.Char8 (pack)
1115import Data.Proxy