DEADSOFTWARE

JVM: исправлено использование HUGEINT для использования в NEW
[dsw-obn.git] / src / oberon-common.h
1 enum {
2 EOF_ = 0,
3 IDENT,
4 MODULE,
5 SEMICOLON,
6 END,
7 DOT,
8 VAR,
9 COLON,
10 BEGIN,
11 ASSIGN,
12 INTEGER,
13 LPAREN,
14 RPAREN,
15 EQUAL,
16 NEQ,
17 LESS,
18 LEQ,
19 GREAT,
20 GEQ,
21 IN,
22 IS,
23 PLUS,
24 MINUS,
25 OR,
26 STAR,
27 SLASH,
28 DIV,
29 MOD,
30 AND,
31 NOT,
32 PROCEDURE,
33 COMMA,
34 RETURN,
35 CONST,
36 TYPE,
37 ARRAY,
38 OF,
39 LBRACK,
40 RBRACK,
41 RECORD,
42 POINTER,
43 TO,
44 UPARROW,
45 NIL,
46 IMPORT,
47 REAL,
48 CHAR,
49 STRING,
50 IF,
51 THEN,
52 ELSE,
53 ELSIF,
54 WHILE,
55 DO,
56 REPEAT,
57 UNTIL,
58 FOR,
59 BY,
60 LOOP,
61 EXIT,
62 LBRACE,
63 RBRACE,
64 DOTDOT,
65 CASE,
66 BAR,
67 WITH
68 };
70 void
71 oberon_error(oberon_context_t * ctx, const char * fmt, ...);