49 lines
1.1 KiB
Plaintext
49 lines
1.1 KiB
Plaintext
|
%{
|
||
|
|
/* ISO Pascal 7185 reserved words.
|
||
|
|
*
|
||
|
|
* For GNU Pascal compiler (GPC) by jtv@hut.fi
|
||
|
|
*
|
||
|
|
* run this through the Doug Schmidt's gperf program
|
||
|
|
* with command
|
||
|
|
* gperf -g -o -j1 -t -p -N is_reserved_word
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
%}
|
||
|
|
struct resword { char *name; short token; short iclass;};
|
||
|
|
%%
|
||
|
|
And, AND, PASCAL_ISO
|
||
|
|
Array, ARRAY, PASCAL_ISO
|
||
|
|
Begin, BEGIN_, PASCAL_ISO
|
||
|
|
Case, CASE, PASCAL_ISO
|
||
|
|
Const, CONST, PASCAL_ISO
|
||
|
|
Div, DIV, PASCAL_ISO
|
||
|
|
Do, DO, PASCAL_ISO
|
||
|
|
Downto, DOWNTO, PASCAL_ISO
|
||
|
|
Else, ELSE, PASCAL_ISO
|
||
|
|
End, END, PASCAL_ISO
|
||
|
|
File, FILE_, PASCAL_ISO
|
||
|
|
For, FOR, PASCAL_ISO
|
||
|
|
Function, FUNCTION, PASCAL_ISO
|
||
|
|
Goto, GOTO, PASCAL_ISO
|
||
|
|
If, IF, PASCAL_ISO
|
||
|
|
In, IN, PASCAL_ISO
|
||
|
|
Label, LABEL, PASCAL_ISO
|
||
|
|
Mod, MOD, PASCAL_ISO
|
||
|
|
Nil, NIL, PASCAL_ISO
|
||
|
|
Not, NOT, PASCAL_ISO
|
||
|
|
Of, OF, PASCAL_ISO
|
||
|
|
Or, OR, PASCAL_ISO
|
||
|
|
Packed, PACKED, PASCAL_ISO
|
||
|
|
Procedure, PROCEDURE, PASCAL_ISO
|
||
|
|
Program,PROGRAM,PASCAL_ISO
|
||
|
|
Record, RECORD, PASCAL_ISO
|
||
|
|
Repeat, REPEAT, PASCAL_ISO
|
||
|
|
Set, SET, PASCAL_ISO
|
||
|
|
Then, THEN, PASCAL_ISO
|
||
|
|
To, TO, PASCAL_ISO
|
||
|
|
Type, TYPE, PASCAL_ISO
|
||
|
|
Until, UNTIL, PASCAL_ISO
|
||
|
|
Var, VAR, PASCAL_ISO
|
||
|
|
While, WHILE, PASCAL_ISO
|
||
|
|
With, WITH, PASCAL_ISO
|