mirror of
https://github.com/AntKrotov/oberon-07-compiler.git
synced 2026-10-05 09:45:47 +00:00
"&" и "OR": исправление ошибки
This commit is contained in:
1 parent
bb8f633206
commit
187260cb4e
4 files changed
+3
-4
No files matched your search
Binary file not shown.
@@ -1916,7 +1916,7 @@ VAR
|
||||
IF (e.obj = eCONST) & isBoolean(e) THEN
|
||||
IL.Const(ORD(ARITH.getBool(e.value)))
|
||||
END;
|
||||
IL.AndOrOpt(label)
|
||||
IL.AddJmpCmd(IL.opJZ, label)
|
||||
END
|
||||
END;
|
||||
|
||||
@@ -2121,8 +2121,7 @@ VAR
|
||||
IF (e.obj = eCONST) & isBoolean(e) THEN
|
||||
IL.Const(ORD(ARITH.getBool(e.value)))
|
||||
END;
|
||||
IL.not;
|
||||
IL.AndOrOpt(label)
|
||||
IL.AddJmpCmd(IL.opJNZ, label)
|
||||
END
|
||||
|
||||
END;
|
||||
|
||||
+1
-1
@@ -24,7 +24,7 @@ CONST
|
||||
|
||||
vMajor* = 1;
|
||||
vMinor* = 52;
|
||||
Date* = "2021-02-12";
|
||||
Date* = "2021-02-14";
|
||||
|
||||
FILE_EXT* = ".ob07";
|
||||
RTL_NAME* = "RTL";
|
||||
|
||||
Reference in new issue
Block a user