on develop help sign in
Reverted CPP statements
29f269cKoray Al
core/src/Network/Google/Prelude.hs−5
@@ -1,4 +1,3 @@
1−{-# LANGUAGE CPP #-}
2-- |
1-- |
3-- Module : Network.Google.Prelude
2-- Module : Network.Google.Prelude
4-- Copyright : (c) 2015-2016 Brendan Hay <brendan.g.hay@gmail.com>
3-- Copyright : (c) 2015-2016 Brendan Hay <brendan.g.hay@gmail.com>
@@ -29,11 +28,7 @@ import Network.HTTP.Client as Export (RequestBody)
29import Numeric.Natural as Export (Natural)
28import Numeric.Natural as Export (Natural)
30import Prelude as Export hiding (product, span, any, Word)
29import Prelude as Export hiding (product, span, any, Word)
31import Servant.API as Export hiding (Headers, Link, getResponse, Stream, ResponseHeader, Header, header)
30import Servant.API as Export hiding (Headers, Link, getResponse, Stream, ResponseHeader, Header, header)
32−#if _GLASGOW_HASKELL__ < 804
33import Servant.Utils.Links as Export hiding (Link)
31import Servant.Utils.Links as Export hiding (Link)
34−#else
35−import Servant.Links as Export hiding (Link)
36−#endif
37import Web.HttpApiData as Export (FromHttpApiData (..), ToHttpApiData (..))
32import Web.HttpApiData as Export (FromHttpApiData (..), ToHttpApiData (..))
38
33
39import Network.Google.Data.Bytes as Export
34import Network.Google.Data.Bytes as Export
core/src/Network/Google/Types.hs−3
@@ -1,4 +1,3 @@
1−{-# LANGUAGE CPP #-}
2{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DataKinds #-}
3{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
4{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
@@ -38,9 +37,7 @@ import Data.Data
38import Data.DList (DList)
37import Data.DList (DList)
39import Data.Foldable (foldMap, foldl')
38import Data.Foldable (foldMap, foldl')
40import Data.String
39import Data.String
41−#if _GLASGOW_HASKELL__ < 804
42import Data.Semigroup
40import Data.Semigroup
43−#endif
44import Data.Text (Text)
41import Data.Text (Text)
45import Data.Text.Lazy.Builder (Builder)
42import Data.Text.Lazy.Builder (Builder)
46
43