Fixes recursion bug in disambiguate_in().
[ohcount] / test / unit / parsers / test_pascal.h
1
2 void test_pascal_comments() {
3   test_parser_verify_parse(
4     test_parser_sourcefile("pascal", " //comment"),
5     "pascal", "", "//comment", 0
6   );
7 }
8
9 void test_pascal_comment_entities() {
10   test_parser_verify_entity(
11     test_parser_sourcefile("pascal", " //comment"),
12     "comment", "//comment"
13   );
14   test_parser_verify_entity(
15     test_parser_sourcefile("pascal", " (*comment*)"),
16     "comment", "(*comment*)"
17   );
18   test_parser_verify_entity(
19     test_parser_sourcefile("pascal", " {comment}"),
20     "comment", "{comment}"
21   );
22 }
23
24 void all_pascal_tests() {
25   test_pascal_comments();
26   test_pascal_comment_entities();
27 }