@@ -1,3 +1,4 @@
1{-# LANGUAGE DataKinds #-}
2{-# LANGUAGE DataKinds #-}
2{-# LANGUAGE FlexibleInstances #-}
3{-# LANGUAGE FlexibleInstances #-}
3{-# LANGUAGE QuasiQuotes #-}
4{-# LANGUAGE QuasiQuotes #-}
@@ -9,7 +10,11 @@
9module Servant.JSSpec where
10module Servant.JSSpec where
11import Data.Either (isRight)
12import Data.Either (isRight)
13+#if !MIN_VERSION_base(4,8,0)
14+import Data.Monoid ((<>),mconcat)
12import Data.Monoid ((<>))
16import Data.Monoid ((<>))
13import Data.Proxy
18import Data.Proxy
14import Data.Text (Text)
19import Data.Text (Text)
15import qualified Data.Text as T
20import qualified Data.Text as T