hablo/test/Main.hs

module Main where

import qualified Structure (test)
import Test.HUnit (Test(..), runTestTTAndExit)
import qualified XML.Card (test)

main :: IO ()
main = runTestTTAndExit $ TestList
  [ XML.Card.test
  , Structure.test ]