Skip to content

Commit

Permalink
Remove comments
Browse files Browse the repository at this point in the history
  • Loading branch information
akegalj committed Mar 22, 2019
1 parent 7672449 commit b68f2e4
Showing 1 changed file with 0 additions and 9 deletions.
9 changes: 0 additions & 9 deletions src/Cardano/Wallet/Primitive/Types.hs
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand All @@ -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)

Expand Down

0 comments on commit b68f2e4

Please sign in to comment.