import           Debug.EventCounters  (initEventCounters)
import           System.Metrics       (newStore)
import           Test.Tasty

import qualified Test.FSM
import qualified Test.TickTable
import qualified Test.Transaq
import qualified Test.Transaq.Parsing

main :: IO ()
main = do
  store <- newStore
  initEventCounters store
  defaultMain $ testGroup "Tests" [unitTests]

unitTests :: TestTree
unitTests = testGroup "Unit Tests"
  [ Test.TickTable.unitTests
  , Test.FSM.unitTests
  , Test.Transaq.unitTests
  , Test.Transaq.Parsing.unitTests ]