keyword_feature.test
1.54 KB
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
(define
(define-syntax
(define-library
(define-values
(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
----------------------------------------------------
[
["punctuation", "("], ["keyword", "define"],
["punctuation", "("], ["keyword", "define-syntax"],
["punctuation", "("], ["keyword", "define-library"],
["punctuation", "("], ["keyword", "define-values"],
["punctuation", "("], ["keyword", "case-lambda"],
["punctuation", "("], ["keyword", "lambda"],
["punctuation", "("], ["keyword", "let"],
["punctuation", "("], ["keyword", "let*"],
["punctuation", "("], ["keyword", "letrec"],
["punctuation", "("], ["keyword", "let-values"],
["punctuation", "("], ["keyword", "let*-values"],
["punctuation", "("], ["keyword", "letrec-values"],
["punctuation", "("], ["keyword", "else"],
["punctuation", "("], ["keyword", "if"],
["punctuation", "("], ["keyword", "cond"],
["punctuation", "("], ["keyword", "begin"],
["punctuation", "("], ["keyword", "delay"],
["punctuation", "("], ["keyword", "delay-force"],
["punctuation", "("], ["keyword", "parameterize"],
["punctuation", "("], ["keyword", "guard"],
["punctuation", "("], ["keyword", "set!"],
["punctuation", "("], ["keyword", "quasi-quote"],
["punctuation", "("], ["keyword", "quote"],
["punctuation", "("], ["keyword", "syntax-rules"]
]
----------------------------------------------------
Checks for keywords.