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 ]