{- Progression-based benchmarks. Progression charts the difference between successive benchmark runs. -} import Criterion.Main hiding (defaultMain, defaultMainWith) import Progression.Main import System.Environment (withArgs) import qualified HledgerMain main = defaultMain $ bench "balance_100x100x10" $ nfIO $ withArgs ["balance", "-f", "100x100x10.ledger", ">/dev/null"] HledgerMain.main