mirror of
https://github.com/simonmichael/hledger.git
synced 2024-12-25 19:31:44 +03:00
add missing test runner
This commit is contained in:
parent
715a2b7f22
commit
73bc81cd7e
24
tools/unittest.hs
Normal file
24
tools/unittest.hs
Normal file
@ -0,0 +1,24 @@
|
||||
{-
|
||||
A standalone unit test runner using test-framework. Compared to hledger's
|
||||
built-in test runner, this one shows verbose ansi-colored hierarchic
|
||||
results, can run tests in parallel, and may have better quickcheck support.
|
||||
-}
|
||||
|
||||
import Test.Framework (defaultMain {-, testGroup-})
|
||||
import Test.Framework.Providers.HUnit (hUnitTestToTests)
|
||||
--import Test.Framework.Providers.QuickCheck2 (testProperty)
|
||||
import Test.HUnit hiding (Test)
|
||||
import qualified Test.HUnit (Test)
|
||||
--import Test.QuickCheck
|
||||
import Tests (tests)
|
||||
import System.Exit (-- exitFailure, exitWith,
|
||||
ExitCode(..))
|
||||
import System.IO (hGetContents, hPutStr, hFlush, stderr, stdout)
|
||||
import Text.Printf (printf)
|
||||
--import Text.ParserCombinators.Parsec
|
||||
import Control.Monad (liftM,when)
|
||||
import Data.Maybe (fromMaybe)
|
||||
import System.Process (runInteractiveCommand, waitForProcess)
|
||||
|
||||
main :: IO ()
|
||||
main = defaultMain $ concatMap hUnitTestToTests tests
|
Loading…
Reference in New Issue
Block a user