-
Notifications
You must be signed in to change notification settings - Fork 1
/
ProtoTerminals.java
207 lines (158 loc) · 7.34 KB
/
ProtoTerminals.java
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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
/* M2J -- Modula-2 to Java Translator & Compiler
*
* Copyright (c) 2016 The Modula-2 Software Foundation
*
* Author & Maintainer: Benjamin Kowarsch <trijezdci@org.m2sf>
*
* @synopsis
*
* M2J is a multi-dialect Modula-2 to Java translator and via-Java compiler.
* It supports the dialects described in the 3rd and 4th editions of Niklaus
* Wirth's book "Programming in Modula-2" (PIM) published by Springer Verlag,
* and an extended mode with select features from the revised language by
* B.Kowarsch and R.Sutcliffe "Modula-2 Revision 2010" (M2R10).
*
* In translator mode, M2J translates Modula-2 source to Java source files.
* In compiler mode, M2J compiles Modula-2 source via Java source files
* to Java .class files using the host system's resident Java compiler.
*
* @repository
*
* https://github.com/m2sf/m2j
*
* @file
*
* ProtoTerminals.java
*
* Public interface for Terminal's token and lexeme lookup.
*
* @license
*
* M2J is free software: you can redistribute and/or modify it under the
* terms of the GNU Lesser General Public License (LGPL) either version 2.1
* or at your choice version 3 as published by the Free Software Foundation.
* However, you may not alter the copyright, author and license information.
*
* M2J is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE. Read the license for more details.
*
* You should have received a copy of the GNU Lesser General Public License
* along with m2j. If not, see <https://www.gnu.org/copyleft/lesser.html>.
*
* NB: Components in the domain part of email addresses are in reverse order.
*/
package org.m2sf.m2j;
interface ProtoTerminals {
/* ---------------------------------------------------------------------------
* type Token
* ---------------------------------------------------------------------------
* Enumerated token values representing Modula-2 terminal symbols.
* ------------------------------------------------------------------------ */
public enum Token {
/* Null Token */
UNKNOWN, /* invalid token */
/* Reserved Words */
AND, ARRAY, BEGIN, BY, CASE, CONST, DEFINITION, DIV, DO, ELSE, ELSIF, END,
EXIT, EXPORT, FOR, FROM, IF, IMPLEMENTATION, IMPORT, IN, LOOP, MOD, MODULE,
NOT, OF, OR, POINTER, PROCEDURE, QUALIFIED, RECORD, REPEAT, RETURN, SET,
THEN, TO, TYPE, UNTIL, VAR, WHILE, WITH,
/* Identifiers */
IDENTIFIER,
/* Literals */
STRING_LITERAL, INT_LITERAL, REAL_LITERAL, CHAR_LITERAL,
/* Malformed Literals */
MALFORMED_STRING, MALFORMED_INTEGER, MALFORMED_REAL, /* invalid tokens */
/* Pragmas */
PRAGMA,
/* Special Symbols */
PLUS, /* '+' */
MINUS, /* '-' */
EQUAL, /* '+' */
NOTEQUAL, /* '#' */
LESS, /* '<' */
LESS_EQUAL, /* '<=' */
GREATER, /* '>' */
GREATER_EQUAL, /* '>=' */
ASTERISK, /* '*' */
SOLIDUS, /* '/' */
ASSIGN, /* ':=' */
COMMA, /* ',' */
PERIOD, /* '.' */
COLON, /* ':' */
SEMICOLON, /* ';' */
RANGE, /* '..' */
DEREF, /* '^' */
BAR, /* '|' */
LEFT_PAREN, /* '(' */
RIGHT_PAREN, /* ')' */
LEFT_BRACKET, /* '[' */
RIGHT_BRACKET, /* ']' */
LEFT_BRACE, /* '{' */
RIGHT_BRACE, /* '}' */
END_OF_FILE;
/* Synonyms */
/* '&' is a synonym for AND, mapped to token AND */
/* '~' is a synonym for NOT, mapped to token NOT */
/* '<>' is a synonym for '#', mapped to token NOTEQUAL */
} /* Token */
/* ---------------------------------------------------------------------------
* function isValid(token)
* ---------------------------------------------------------------------------
* Returns true if token represents a valid token, otherwise false.
* ------------------------------------------------------------------------ */
public boolean isValid (Token token);
/* ---------------------------------------------------------------------------
* function isResword(token)
* ---------------------------------------------------------------------------
* Returns true if token represents a reserved word, otherwise false.
* ------------------------------------------------------------------------ */
public boolean isResword (Token token);
/* ---------------------------------------------------------------------------
* function isLiteral(token)
* ---------------------------------------------------------------------------
* Returns true if token represents a literal, otherwise false.
* ------------------------------------------------------------------------ */
public boolean isLiteral (Token token);
/* ---------------------------------------------------------------------------
* function isMalformedLiteral(token)
* ---------------------------------------------------------------------------
* Returns true if token represents a malformed literal, otherwise false.
* ------------------------------------------------------------------------ */
public boolean isMalformedLiteral (Token token);
/* ---------------------------------------------------------------------------
* function isSpecialSymbol(token)
* ---------------------------------------------------------------------------
* Returns true if token represents a special symbol, otherwise false.
* ------------------------------------------------------------------------ */
public boolean isSpecialSymbol (Token token);
/* ---------------------------------------------------------------------------
* function tokenForResword(lexeme, length)
* ---------------------------------------------------------------------------
* Tests if the given lexeme represents a reserved word and returns the
* corresponding token or UNKNOWN if it does not match a reserved word.
* ------------------------------------------------------------------------ */
public Token tokenForResword (String lexeme, int length);
/* ---------------------------------------------------------------------------
* function lexemeForResword(token)
* ---------------------------------------------------------------------------
* Returns a string with the lexeme for the reserved word represented by
* token. Returns NULL if the token does not represent a reserved word.
* ------------------------------------------------------------------------ */
public String lexemeForResword (Token token);
/* ---------------------------------------------------------------------------
* function lexemeForSpecialSymbol(token)
* ---------------------------------------------------------------------------
* Returns a string with the lexeme for the special symbol represented by
* token. Returns NULL if the token does not represent a special symbol.
* ------------------------------------------------------------------------ */
public String lexemeForSpecialSymbol (Token token);
/* ---------------------------------------------------------------------------
* function nameForToken(token)
* ---------------------------------------------------------------------------
* Returns a string with a human readable name for token. Returns NULL if
* token is not a valid token.
* ------------------------------------------------------------------------ */
public String nameForToken (Token token);
} /* ProtoTerminals */
/* END OF FILE */