summaryrefslogtreecommitdiffstats
path: root/pigeonhole/tests/lexer.svtest
blob: 491309d0b77fa768ec4623113481e575b7da75db (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
require "vnd.dovecot.testsuite";
require "variables";

/* Test conformance to RFC 5228 - 2.4.2. Strings */

set "text" text: # Comment
Line 1
.Line 2
..Line 3
.Line 4
Line 5
.
;

set "quoted"
"Line 1
.Line 2
.Line 3
.Line 4
Line 5
";

test "String Literal" {
	if not string :is "${text}" "${quoted}" {
		test_fail "lexer messed-up dot stuffing";
	}

	if string :is "${text}" "" {
		test_fail "variable substitution failed";
	}
}

test "Unknown Escapes" {
	if not string :is "\a\a\a\a\a" "aaaaa" {
		test_fail "unknown quoted string escape sequences are handled inappropriately";
	}
}