blob: c5668fb1a350d6d36ee4ee7af9eebbe2e125a959 (
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
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
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
'#!r6rs' Comment
'\n\n' Text.Whitespace
'#|' Comment.Multiline
'\n\n The FACT procedure computes the factorial\n\n of a non-negative integer.\n\n ' Comment.Multiline
'#|' Comment.Multiline
' These comments can be nested too. ' Comment.Multiline
'|#' Comment.Multiline
'\n\n' Comment.Multiline
'|#' Comment.Multiline
'\n\n' Text.Whitespace
'(' Punctuation
'define' Keyword
' ' Text.Whitespace
'fact' Name.Variable
'\n\n ' Text.Whitespace
'(' Punctuation
'lambda' Keyword
' ' Text.Whitespace
'(' Punctuation
'n' Name.Function
')' Punctuation
'\n\n ' Text.Whitespace
';; base case' Comment.Single
'\n\n ' Text.Whitespace
'(' Punctuation
'if' Keyword
' ' Text.Whitespace
'(' Punctuation
'=' Name.Builtin
' ' Text.Whitespace
'n' Name.Variable
' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
'\n\n ' Text.Whitespace
'#;(' Comment
'= n 1' Comment
')' Comment
'\n ' Text.Whitespace
'#;(' Comment
'= n ' Comment
'[' Comment
'1+ ' Comment
'(' Comment
"eval '" Comment
'(' Comment
'n' Comment
')' Comment
')' Comment
']' Comment
')' Comment
'1' Literal.Number.Integer
'\n ' Text.Whitespace
'#;[' Comment
'= n ' Comment
'(' Comment
'1+ ' Comment
'[' Comment
"eval '" Comment
'[' Comment
'n' Comment
']' Comment
']' Comment
')' Comment
']' Comment
';; another comment' Comment.Single
'\n ' Text.Whitespace
'#;' Comment
'1' Comment
'\n ' Text.Whitespace
'; identity of *' Comment.Single
'\n\n ' Text.Whitespace
'(' Punctuation
'*' Name.Builtin
' ' Text.Whitespace
'n' Name.Variable
' ' Text.Whitespace
'(' Punctuation
'fact' Name.Function
' ' Text.Whitespace
'(' Punctuation
'-' Name.Builtin
' ' Text.Whitespace
'n' Name.Variable
' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
')' Punctuation
')' Punctuation
')' Punctuation
')' Punctuation
')' Punctuation
'\n' Text.Whitespace
|
