composewell/streamly
1
1
Fork 0
mirror of https://github.com/composewell/streamly.git synced 2024-09-11 11:37:22 +03:00
Code Issues Packages Projects Releases Wiki Activity

Update compatible serializtion generation

Browse Source
This commit is contained in:
Adithya Kumar 2023-08-28 19:37:35 +05:30
parent 0650565799
commit f85802e18f
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
benchmark/Streamly/Benchmark/Data/Transaction.hs
View File

@ -12,7 +12,9 @@
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}
module Transaction (Transaction) where
module Transaction where
-------------------------------------------------------------------------------
-- Imports
@ -375,7 +377,7 @@ instance NFData PayerInfo where
rnf _payerMobileNumberHash `seq`
rnf _upiNumber `seq` rnf _upiNumberHash `seq` rnf _someDum
$(deriveSerialize ''PayerInfo)
$(deriveCompatSerialize ''PayerInfo)
$(makeStore ''PayerInfo)
instance Arbitrary PayerInfo where
@ -426,7 +428,7 @@ instance NFData PayeeInfo where
rnf _upiNumber `seq`
rnf _upiNumberHash `seq` rnf _maskedAccountNumber `seq` rnf _bankIIN
$(deriveSerialize ''PayeeInfo)
$(deriveCompatSerialize ''PayeeInfo)
$(makeStore ''PayeeInfo)
instance Arbitrary PayeeInfo where
@ -482,7 +484,7 @@ instance Arbitrary NpciResponse where
(Just <$> arbitrary) <*>
(Just <$> arbitrary)
$(deriveSerialize ''NpciResponse)
$(deriveCompatSerialize ''NpciResponse)
$(makeStore ''NpciResponse)
-- add more fields if required to TxnInfo
@ -533,7 +535,7 @@ instance NFData TxnInfo where
rnf _tiMerchantRequestId `seq`
rnf _tiRiskScore `seq` rnf _tiCode `seq` rnf _tpvRefFailed
$(deriveSerialize ''TxnInfo)
$(deriveCompatSerialize ''TxnInfo)
$(makeStore ''TxnInfo)
instance Arbitrary TxnInfo where
@ -594,7 +596,7 @@ data Transaction = Transaction
, _myval :: !(Maybe Text)
} deriving (Generic, Show, Eq)
$(deriveSerialize ''Transaction)
$(deriveCompatSerialize ''Transaction)
-- $(makeStore ''Transaction)
-- $(deriveCompatSerialize ''Transaction)