From 281425310c5db21f87981eeb9601a71d1974d98d Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Thu, 10 Apr 2014 05:25:03 +1000 Subject: Rearranging files --- src/test.hs | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 src/test.hs (limited to 'src/test.hs') 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 + -- cgit