hledger/RawLedger.hs

16 lines
329 B
Haskell
Raw Normal View History

2008-10-03 02:17:04 +04:00
module RawLedger
where
import qualified Data.Map as Map
import Utils
import 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))