;roi: optimize "one period per report interval" case a bit

This commit is contained in:
Dmitry Astapov 2025-01-19 15:27:31 +00:00 committed by Simon Michael
parent a359d6b828
commit 9d4db48510

View File

@ -154,7 +154,9 @@ roi CliOpts{rawopts_=rawopts, reportspec_=rspec@ReportSpec{_rsReportOpts=ReportO
, T.pack $ printf "%0.2f%%" $ smallIsZero annualizedTwr ]
periodRows <- forM spans processSpan
totalRow <- processSpan fullPeriod
totalRow <- case periodRows of
[singleRow] -> return singleRow
_ -> processSpan fullPeriod
let rowTitles = Tab.Group Tab.NoLine (map (Header . T.pack . show) (take (length periodRows) [1..]))