lib/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
   7
   8 main :: IO ()
   9 main = defaultMain $ hUnitTestToTests test_Hcompta
  10
  11 test_Hcompta :: Test
  12 test_Hcompta =
  13         TestList
  14          [ "dummy test" ~:
  15                 assertBool "" $ True
  16          ]