diff options
author | Jed Barber <jjbarber@y7mail.com> | 2014-04-10 05:25:03 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2014-04-10 05:25:03 +1000 |
commit | 281425310c5db21f87981eeb9601a71d1974d98d (patch) | |
tree | bef4643d906c93622c311fef2cf758fe94f1f651 /src/test.hs | |
parent | e8695600977769008f285f9958eb043cca1b9b29 (diff) |
Rearranging files
Diffstat (limited to 'src/test.hs')
-rw-r--r-- | src/test.hs | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/src/test.hs b/src/test.hs new file mode 100644 index 0000000..5fc3533 --- /dev/null +++ b/src/test.hs @@ -0,0 +1,29 @@ + +import Test.HUnit +import qualified Fractran.Test +import qualified Thue.Test +import qualified Unlambda.Test + + + + +main = do + putStrLn "Fractran Parser" + runTestTT Fractran.Test.parserTests + + putStrLn "\nFractran Interpreter" + runTestTT Fractran.Test.interpreterTests + + putStrLn "\nThue Parser" + runTestTT Thue.Test.parserTests + + putStrLn "\nextractInfix" + runTestTT Thue.Test.extractInfixTests + + putStrLn "\nUnlambda Parser" + runTestTT Unlambda.Test.parserTests + + putStrLn "\nUnlambda Interpreter" + tests <- Unlambda.Test.interpreterTests + runTestTT tests + |