Разрешено повторно объявлять блоки CONST TYPE VAR, поправлено сравнение массивов...

[dsw-obn.git] / src / oberon-common.h

diff --git a/src/oberon-common.h b/src/oberon-common.h
index ccbe6e1a84301c0c62659845617fc8415aae25fa..d4988a4c398a339b76b314b9be4926b95336e637 100644 (file)
--- a/src/oberon-common.h
+++ b/src/oberon-common.h
@@ -5,7 +5,6 @@ enum {
         SEMICOLON,
         END,
         DOT,
-        VAR,
         COLON,
         BEGIN,
         ASSIGN,
@@ -29,11 +28,8 @@ enum {
         MOD,
         AND,
         NOT,
-        PROCEDURE,
         COMMA,
         RETURN,
-        CONST,
-        TYPE,
         ARRAY,
         OF,
         LBRACK,
@@ -64,7 +60,12 @@ enum {
         DOTDOT,
         CASE,
         BAR,
-        WITH
+        WITH,
+
+        CONST,
+        TYPE,
+        VAR,
+        PROCEDURE
 };
 
 void