cli/Test/Main.hs

   1 import Prelude
   2 import Test.HUnit
   3 import Test.Framework.Providers.HUnit (hUnitTestToTests)
   4 import Test.Framework.Runners.Console (defaultMain)
   5
   6 import Hcompta.Cli
   7
   8 main :: IO ()
   9 main = defaultMain $ hUnitTestToTests test_Hcompta_Cli
  10
  11 test_Hcompta_Cli :: Test
  12 test_Hcompta_Cli =
  13         TestList
  14          [ "dummy test" ~:
  15                 assertBool "" $ True
  16          ]