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

selftest -> test

Browse Source
This commit is contained in:
Simon Michael 2007-07-04 03:41:15 +00:00
parent 6d1816109c
commit eccc932258
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
hledger.hs
View File

@ -16,7 +16,7 @@ import Options
import Models
import Parse
import Tests
import Utils
import Utils hiding (test)
main :: IO ()
@ -28,13 +28,13 @@ main = do
| Help `elem` opts = putStr usage
| cmd `isPrefixOf` "register" = register opts acctpats descpats
| cmd `isPrefixOf` "balance" = balance opts acctpats descpats
| cmd `isPrefixOf` "test" = selftest
| cmd `isPrefixOf` "test" = test
| otherwise = putStr usage
-- commands
selftest :: IO () -- "hledger test"
selftest = do
test :: IO ()
test = do
Tests.hunit
Tests.quickcheck
return ()