git.iko.soy/project-m36
on bfaecd2 help sign in
project-m36/src/lib/ProjectM36/TransactionDiffs.hs
12 lines 280 B history raw
1module ProjectM36.TransactionDiffs where
2import ProjectM36.Base
3import Data.List.NonEmpty
4import Data.UUID as U
6{-
7root :: TransactionDiffs
8root = single U.nil NoOperation
10single :: TransactionId -> TransactionDiffExpr -> TransactionDiffs
11single tid expr = (tid, expr) :| []
12-}