From b68f2e48d7ec722810548440b2e67df0393f5227 Mon Sep 17 00:00:00 2001 From: Ante Kegalj Date: Fri, 22 Mar 2019 19:11:54 +0100 Subject: [PATCH] Remove comments --- src/Cardano/Wallet/Primitive/Types.hs | 9 --------- 1 file changed, 9 deletions(-) diff --git a/src/Cardano/Wallet/Primitive/Types.hs b/src/Cardano/Wallet/Primitive/Types.hs index 0ef3ebf6179..eb1bea9889d 100644 --- a/src/Cardano/Wallet/Primitive/Types.hs +++ b/src/Cardano/Wallet/Primitive/Types.hs @@ -222,15 +222,8 @@ instance Buildable (TxIn, TxOut) where data TxMeta = TxMeta { metaId :: !(Hash "Tx") - -- FIXME: we might want to go for something more optimized than natural, - -- like Word64 ? , depth :: !(Quantity "block" Natural) , status :: !TxStatus - -- FIXME: should we use Quantity "lovelace" Natural ? - -- I wonder could we use somethine like proposed instead of Coin in wallet - -- part alltogether. Node/core bits would still work optimally with - -- Coin/Word64 - -- but wallet bits could go a bit more abstract (and less optimized)? , amount :: !Coin , direction :: !Direction , timestamp :: !Timestamp @@ -249,8 +242,6 @@ data Direction deriving (Show, Eq, Generic) newtype Timestamp = Timestamp - -- NOTE: We could have gone for Microsecond from Data.Time.Units, but - -- it seems like an overkill for now { getTimestamp :: UTCTime } deriving (Show, Generic, Eq, Ord)