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

test for too-loose transaction parsing

Browse Source
This commit is contained in:
Simon Michael 2009-04-10 04:27:16 +00:00
parent 638238dc5c
commit 0b22774ec9
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Tests.hs
View File

@ -560,6 +560,8 @@ tests = [
,"ledgerTransaction" ~: do ,"ledgerTransaction" ~: do
parseWithCtx ledgerTransaction entry1_str `parseis` entry1 parseWithCtx ledgerTransaction entry1_str `parseis` entry1
assertBool "ledgerTransaction should not parse just a date"
$ isLeft $ parseWithCtx ledgerTransaction "2009/1/1\n"
,"ledgerHistoricalPrice" ~: do ,"ledgerHistoricalPrice" ~: do
parseWithCtx ledgerHistoricalPrice price1_str `parseis` price1 parseWithCtx ledgerHistoricalPrice price1_str `parseis` price1