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

assertnotequal

Browse Source
This commit is contained in:
Simon Michael 2008-10-10 11:11:49 +00:00
parent 77b7de1b5f
commit 9b5a35b5d2
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Ledger/Utils.hs
View File

@ -41,6 +41,7 @@ import Text.ParserCombinators.Parsec (parse)
-- testing -- testing
assertequal e a = assertEqual "" e a assertequal e a = assertEqual "" e a
assertnotequal e a = assertBool "expected inequality, got equality" (e /= a)
parsewith p ts = parse p "" ts parsewith p ts = parse p "" ts