mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
[report-utilities] gnc:account-get-balances-at-dates: use quicksort
stable-sort! is slower than quicksort.
This commit is contained in:
parent
7587c3b4e3
commit
f72df3e1bc
@ -470,7 +470,7 @@ flawed. see report-utilities.scm. please update reports.")
|
||||
(define (amount->monetary bal)
|
||||
(gnc:make-gnc-monetary (xaccAccountGetCommodity account) bal))
|
||||
(let loop ((splits (xaccAccountGetSplitList account))
|
||||
(dates-list (stable-sort! dates-list <))
|
||||
(dates-list (sort dates-list <))
|
||||
(currentbal 0)
|
||||
(lastbal 0)
|
||||
(balancelist '()))
|
||||
|
Loading…
Reference in New Issue
Block a user