@@ -1,4 +1,3 @@
1−{-# LANGUAGE CPP #-}
21{-# LANGUAGE DataKinds #-}
32{-# LANGUAGE FlexibleInstances #-}
43{-# LANGUAGE QuasiQuotes #-}
@@ -7,18 +6,18 @@
76{-# LANGUAGE TypeOperators #-}
87{-# LANGUAGE OverloadedStrings #-}
98{-# OPTIONS_GHC -fno-warn-orphans #-}
9+
1010module Servant.JSSpec where
1111
1212import Data.Either (isRight)
13−#if !MIN_VERSION_base(4,8,0)
14−import Data.Monoid ((<>),mconcat)
15−#else
16−import Data.Monoid ((<>))
17−#endif
13+import Data.Monoid ()
14+import Data.Monoid.Compat ((<>))
1815import Data.Proxy
1916import Data.Text (Text)
2017import qualified Data.Text as T
2118import Language.ECMAScript3.Parser (program, parse)
19+import Prelude ()
20+import Prelude.Compat
2221import Test.Hspec hiding (shouldContain, shouldNotContain)
2322
2423import Servant.API.Internal.Test.ComprehensiveAPI