2024-05-01 21:07:04 +02:00
|
|
|
module Main where
|
|
|
|
|
|
|
|
|
|
import Test.HUnit
|
|
|
|
|
import TestLexer
|
2024-05-03 15:47:41 +02:00
|
|
|
import TestParser
|
2024-05-01 21:07:04 +02:00
|
|
|
|
2024-05-02 22:33:35 +02:00
|
|
|
tests = TestList [
|
2024-06-14 07:57:38 +02:00
|
|
|
TestLabel "TestLexer" TestLexer.tests,
|
|
|
|
|
TestLabel "TestParser" TestParser.tests
|
|
|
|
|
]
|
2024-05-01 21:07:04 +02:00
|
|
|
|
|
|
|
|
main = do runTestTTAndExit Main.tests
|
