forked from PrismJS/prism
/
keyword_feature.test
67 lines (63 loc) · 2.51 KB
/
keyword_feature.test
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
(define)
(define-library)
(define-macro)
(define-syntax)
(define-values)
(defmacro)
(case-lambda)
(lambda)
(let)
(let*)
(letrec)
(let-values)
(let*-values)
(letrec-values)
(else)
(if)
(cond)
(begin)
(delay)
(delay-force)
(parameterize)
(guard)
(set!)
(quasi-quote)
(quote)
(syntax-rules)
(syntax-case)
(letrec-syntax)
(let-syntax)
----------------------------------------------------
[
["punctuation", "("], ["keyword", "define"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "define-library"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "define-macro"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "define-syntax"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "define-values"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "defmacro"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "case-lambda"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "lambda"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "let"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "let*"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "letrec"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "let-values"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "let*-values"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "letrec-values"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "else"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "if"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "cond"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "begin"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "delay"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "delay-force"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "parameterize"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "guard"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "set!"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "quasi-quote"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "quote"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "syntax-rules"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "syntax-case"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "letrec-syntax"], ["punctuation", ")"],
["punctuation", "("], ["keyword", "let-syntax"], ["punctuation", ")"]
]
----------------------------------------------------
Checks for keywords.