mirror of
https://github.com/simonmichael/hledger.git
synced 2024-11-07 21:15:19 +03:00
16 lines
329 B
Haskell
16 lines
329 B
Haskell
module RawLedger
|
|
where
|
|
import qualified Data.Map as Map
|
|
|
|
import Utils
|
|
import Types
|
|
import AccountName
|
|
import LedgerEntry
|
|
|
|
|
|
instance Show RawLedger where
|
|
show l = printf "RawLedger with %d entries"
|
|
((length $ entries l) +
|
|
(length $ modifier_entries l) +
|
|
(length $ periodic_entries l))
|