eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

fix another build error

Browse source
This commit is contained in:
Alp Mestanogullari 2015-08-10 11:44:29 +02:00 committed by Arian van Putten
parent 5bd4789387
commit 6906b553fb
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
servant-server/test/Servant/ServerSpec.hs
View file

@ -1,3 +1,4 @@
{-# LANGUAGE CPP #-}
{-# LANGUAGE DataKinds #-} {-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
@ -16,7 +17,11 @@ import Data.Aeson (FromJSON, ToJSON, decode', encode)
import Data.ByteString (ByteString) import Data.ByteString (ByteString)
import Data.ByteString.Conversion () import Data.ByteString.Conversion ()
import Data.Char (toUpper) import Data.Char (toUpper)
#if !MIN_VERSION_base(4,8,0)
import Data.Monoid ((<>), mempty)
#else
import Data.Monoid ((<>)) import Data.Monoid ((<>))
#endif
import Data.Proxy (Proxy (Proxy)) import Data.Proxy (Proxy (Proxy))
import Data.String (fromString) import Data.String (fromString)
import Data.String.Conversions (cs) import Data.String.Conversions (cs)