b70491c · typeable/id · git.iko.soy

git.iko.soy/typeable/id

B2H-746: Make packages compatible with vanila reflex-platform (#6092)

commitb70491c242a650645dd3b9988001c7e3e8c5d655 authorVladislav Lagunov <vlad.lagunoff@gmail.com> dateWed 2 Jun 2021, 11:55 (5 years ago) parentf9c20b2

2 files changed+11−2

compare with master

unifiedsplit

id.cabal+3−1 src/Data/Id.hs+8−1

id.cabal+3−1

@@ -18,10 +18,12 @@ library

1818 hashable,

1919 http-api-data,

2020 lens,

21− postgresql-simple,

2221 openapi3,

2322 uuid,

2423 path-pieces,

24+ if !impl(ghcjs)

25+ build-depends:

26+ postgresql-simple,

2527 hs-source-dirs:

2628 src

2729 default-language:

src/Data/Id.hs+8−1

@@ -1,3 +1,4 @@

1+{-# LANGUAGE CPP #-}

12{-# LANGUAGE DeriveDataTypeable #-}

23{-# LANGUAGE TemplateHaskell #-}

34{-# OPTIONS_GHC -Wno-orphans #-}

@@ -18,8 +19,10 @@ import Data.Hashable (Hashable)

1819import Data.OpenApi

1920import Data.UUID (UUID)

2021import qualified Data.UUID as UUID

22+#ifndef ghcjs_HOST_OS

2123import Database.PostgreSQL.Simple.FromField (FromField)

2224import Database.PostgreSQL.Simple.ToField (ToField)

25+#endif

2326import GHC.Generics (Generic)

2427import Test.QuickCheck

2528import Web.HttpApiData

@@ -27,7 +30,11 @@ import Web.PathPieces (PathPiece(..))

2730

2831newtype Id t = Id { unId :: UUID }

2932 deriving

30− ( Eq, Ord, Generic, Read, Show, Data, ToField, FromField, PathPiece, FromJSON

33+ ( Eq, Ord, Generic, Read, Show, Data

34+#ifndef ghcjs_HOST_OS

35+ , ToField, FromField

36+#endif

37+ , PathPiece, FromJSON

3138 , ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema, ToParamSchema

3239 , FromHttpApiData, ToHttpApiData )

3340