hledger/RawLedger.hs

16 lines
343 B
Haskell
Raw Normal View History

2008-10-03 02:17:04 +04:00
module RawLedger
where
import qualified Data.Map as Map
import Ledger.Utils
2008-10-03 04:12:59 +04:00
import Ledger.Types
2007-07-03 03:41:07 +04:00
import AccountName
import LedgerEntry
2008-10-03 02:17:04 +04:00
instance Show RawLedger where
show l = printf "RawLedger with %d entries"
((length $ entries l) +
(length $ modifier_entries l) +
(length $ periodic_entries l))