tests:: Test
tests = TestList [TestLabel "intro test file" introTest,
                  TestLabel "funName test file" testSucc1,
                  TestLabel "*/%/+/- precedence test file" testSucc2,
                  TestLabel "=== / < precedence test file" testSucc3,
                  TestLabel "'=' associativity test file" testSucc4,
                  TestLabel "allowed Ident test file" testSucc5,
                  TestLabel "illegal Ident test file" testSucc6,
                  TestLabel "reserved Ident test file" testSucc7,
                  TestLabel "spaces after dot error" testSucc8]
tests:: Test
tests = TestList [TestLabel "intro test file" introTest,
                  TestLabel "funName test file" testSucc1,
                  TestLabel "*/%/+/- precedence test file" testSucc2,
                  TestLabel "=== / < precedence test file" testSucc3,
                  TestLabel "'=' associativity test file" testSucc4,
                  TestLabel "allowed Ident test file" testSucc5,
                  TestLabel "illegal Ident test file" testSucc6,
                  TestLabel "reserved Ident test file" testSucc7,
                  TestLabel "spaces after dot error" testSucc8]
tests = TestList [TestLabel "intro test file" introTest,
                  TestLabel "funName test file" testSucc1,
                  TestLabel "*/%/+/- precedence test file" testSucc2,
                  TestLabel "=== / < precedence test file" testSucc3,
                  TestLabel "'=' associativity test file" testSucc4,
                  TestLabel "allowed Ident test file" testSucc5,
                  TestLabel "illegal Ident test file" testSucc6,
                  TestLabel "reserved Ident test file" testSucc7,
                  TestLabel "spaces after dot error" testSucc8]