slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

lib: fix journalApplyValue test (#999)

Browse Source
This commit is contained in:
Simon Michael 2019-04-23 07:20:10 -07:00
parent 08d226aaf5
commit 1cacfcea28
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hledger/Hledger/Cli/Utils.hs
View File

@ -307,8 +307,10 @@ tests_Cli_Utils = tests "Utils" [
-- Print the time required to convert one of the sample journals' amounts to value. -- Print the time required to convert one of the sample journals' amounts to value.
-- Pretty clunky, but working. -- Pretty clunky, but working.
-- XXX sample.journal has no price records, but is always present.
-- Change to eg examples/5000x1000x10.journal to make this useful.
test "time" $ do test "time" $ do
ej <- io $ readJournalFile definputopts "examples/3000x1000x10.journal" ej <- io $ readJournalFile definputopts "examples/sample.journal"
case ej of case ej of
Left e -> crash $ T.pack e Left e -> crash $ T.pack e
Right j -> do Right j -> do

1
tests/0unittests/examples Symbolic link
View File

@ -0,0 +1 @@
../../examples