git.oblomov.eu Git - ohcount/blob - test/unit/parsers/test_stratego.h

   1
   2 void test_stratego_comments() {
   3   test_parser_verify_parse(
   4     test_parser_sourcefile("stratego", " // comment"),
   5     "stratego", "", "// comment", 0
   6   );
   7 }
   8
   9 void test_stratego_char_string_entities() {
  10   test_parser_verify_entity(
  11     test_parser_sourcefile("stratego", " 'c'"),
  12     "string", "'c'"
  13   );
  14   // single quote can be used in identifiers
  15   // weak case
  16   test_parser_verify_entity(
  17     test_parser_sourcefile("stratego", " c'"),
  18     "string", ""
  19   );
  20   // strong case
  21   test_parser_verify_entity(
  22     test_parser_sourcefile("stratego", " c' = e'"),
  23     "string", ""
  24   );
  25 }
  26
  27 void all_stratego_tests() {
  28   test_stratego_comments();
  29   test_stratego_char_string_entities();
  30 }