Codebase list ohcount / 4fa67836-5fea-4473-87e4-bd80a2d5b1ae/main test / unit / parsers / test_perl.h
4fa67836-5fea-4473-87e4-bd80a2d5b1ae/main

Tree @4fa67836-5fea-4473-87e4-bd80a2d5b1ae/main (Download .tar.gz)

test_perl.h @4fa67836-5fea-4473-87e4-bd80a2d5b1ae/main — raw · history · blame 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
void test_perl_comments() {
  test_parser_verify_parse(
    test_parser_sourcefile("perl", " #comment"),
    "perl", "", "#comment", 0
  );
}

void test_perl_comment_entities() {
  test_parser_verify_entity(
    test_parser_sourcefile("perl", " #comment"),
    "comment", "#comment"
  );
  test_parser_verify_entity(
    test_parser_sourcefile("perl", "=head1\ncomment\n=cut"),
    "comment", "=head1\ncomment\n=cut"
  );
}

void all_perl_tests() {
  test_perl_comments();
  test_perl_comment_entities();
}