testSucc3 :: Test
testSucc3 = TestCase (do parsedFile <- parseFile "tests/precedence2"
                         assertEqual "=== / < precedence test"
                                      precedence2AST $ show parsedFile)
testSucc3 :: Test
testSucc3 = TestCase (do parsedFile <- parseFile "tests/precedence2"
                         assertEqual "=== / < precedence test"
                                      precedence2AST $ show parsedFile)
testSucc3 = TestCase (do parsedFile <- parseFile "tests/precedence2"
                         assertEqual "=== / < precedence test"
                                      precedence2AST $ show parsedFile)