blob: b1c5c7f0f887d863eeff26bc76ba6fc1fd1fac64 (
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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
|
;
; Table generated from the file macro.l by SILex 1.0
;
(define macro-tables
(vector
'all
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(make-tok eof-tok yytext yyline yycolumn)
))
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(begin
(display "Error: Invalid token.")
(newline)
'error)
))
(vector
#t
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(make-tok hblank-tok yytext yyline yycolumn)
))
#t
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(make-tok vblank-tok yytext yyline yycolumn)
))
#t
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(make-tok percent-percent-tok yytext yyline yycolumn)
))
#t
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(parse-id yytext yyline yycolumn)
))
#t
(lambda (yycontinue yygetc yyungetc)
(lambda (yytext yyline yycolumn yyoffset)
(make-tok illegal-tok yytext yyline yycolumn)
)))
'tagged-chars-lists
0
0
'#((((#f #\ #\space) . 8)
((#f #\;) . 7)
((#f #\newline) . 6)
((#f #\%) . 5)
((#f #\! #\$ #\& #\* #\/ #\: #\< #\= #\> #\? #\A #\B #\C #\D #\E
#\F #\G #\H #\I #\J #\K #\L #\M #\N #\O #\P #\Q #\R #\S #\T #\U
#\V #\W #\X #\Y #\Z #\^ #\_ #\a #\b #\c #\d #\e #\f #\g #\h #\i
#\j #\k #\l #\m #\n #\o #\p #\q #\r #\s #\t #\u #\v #\w #\x #\y
#\z #\~)
.
4)
((#f #\+ #\-) . 3)
((#f #\.) . 2)
((#t #\ #\newline #\space #\! #\$
#\% #\& #\* #\+ #\- #\.
#\/ #\: #\; #\< #\= #\>
#\? #\A #\B #\C #\D #\E
#\F #\G #\H #\I #\J #\K
#\L #\M #\N #\O #\P #\Q
#\R #\S #\T #\U #\V #\W
#\X #\Y #\Z #\^ #\_ #\a
#\b #\c #\d #\e #\f #\g
#\h #\i #\j #\k #\l #\m
#\n #\o #\p #\q #\r #\s
#\t #\u #\v #\w #\x #\y
#\z #\~)
.
1))
()
(((#f #\.) . 9))
()
(((#f #\! #\$ #\% #\& #\* #\+ #\- #\. #\/ #\0 #\1 #\2 #\3 #\4 #\5
#\6 #\7 #\8 #\9 #\: #\< #\= #\> #\? #\A #\B #\C #\D #\E #\F #\G
#\H #\I #\J #\K #\L #\M #\N #\O #\P #\Q #\R #\S #\T #\U #\V #\W
#\X #\Y #\Z #\^ #\_ #\a #\b #\c #\d #\e #\f #\g #\h #\i #\j #\k
#\l #\m #\n #\o #\p #\q #\r #\s #\t #\u #\v #\w #\x #\y #\z #\~)
.
10))
(((#f #\%) . 11)
((#f #\! #\$ #\& #\* #\+ #\- #\. #\/ #\0 #\1 #\2 #\3 #\4 #\5 #\6
#\7 #\8 #\9 #\: #\< #\= #\> #\? #\A #\B #\C #\D #\E #\F #\G #\H
#\I #\J #\K #\L #\M #\N #\O #\P #\Q #\R #\S #\T #\U #\V #\W #\X
#\Y #\Z #\^ #\_ #\a #\b #\c #\d #\e #\f #\g #\h #\i #\j #\k #\l
#\m #\n #\o #\p #\q #\r #\s #\t #\u #\v #\w #\x #\y #\z #\~)
.
10))
()
(((#t #\newline) . 12))
()
(((#f #\.) . 13))
(((#f #\! #\$ #\% #\& #\* #\+ #\- #\. #\/ #\0 #\1 #\2 #\3 #\4 #\5
#\6 #\7 #\8 #\9 #\: #\< #\= #\> #\? #\A #\B #\C #\D #\E #\F #\G
#\H #\I #\J #\K #\L #\M #\N #\O #\P #\Q #\R #\S #\T #\U #\V #\W
#\X #\Y #\Z #\^ #\_ #\a #\b #\c #\d #\e #\f #\g #\h #\i #\j #\k
#\l #\m #\n #\o #\p #\q #\r #\s #\t #\u #\v #\w #\x #\y #\z #\~)
.
10))
(((#f #\! #\$ #\% #\& #\* #\+ #\- #\. #\/ #\0 #\1 #\2 #\3 #\4 #\5
#\6 #\7 #\8 #\9 #\: #\< #\= #\> #\? #\A #\B #\C #\D #\E #\F #\G
#\H #\I #\J #\K #\L #\M #\N #\O #\P #\Q #\R #\S #\T #\U #\V #\W
#\X #\Y #\Z #\^ #\_ #\a #\b #\c #\d #\e #\f #\g #\h #\i #\j #\k
#\l #\m #\n #\o #\p #\q #\r #\s #\t #\u #\v #\w #\x #\y #\z #\~)
.
10))
(((#t #\newline) . 12))
())
'#((#f . #f) (4 . 4) (4 . 4) (3 . 3) (3 . 3) (3 . 3) (1 . 1)
(0 . 0) (0 . 0) (#f . #f) (3 . 3) (2 . 2) (0 . 0) (3 . 3))))
|
