administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

#2676

Browse source
This commit is contained in:
Ivan Bondarev 2023-12-28 11:46:18 +01:00
parent 0e3a3c232e
commit a25a8bfe0e
2 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
TestSuite/operators3.pas Normal file
View file

@ -0,0 +1,4 @@
begin
assert(1bi shl 2 = 4bi);
assert(10bi shr 2 = 2bi);
end.

2
TreeConverter/TreeConversion/compiler_string_consts.cs
View file

@ -38,6 +38,8 @@ namespace PascalABCCompiler.TreeConverter
oper_names[mod_name] = "op_Modulus"; oper_names[mod_name] = "op_Modulus";
oper_names[not_name] = "op_LogicalNot"; oper_names[not_name] = "op_LogicalNot";
oper_names[noteq_name] = "op_Inequality"; oper_names[noteq_name] = "op_Inequality";
oper_names[shl_name] = "op_LeftShift";
oper_names[shr_name] = "op_RightShift";
} }
public static string GetNETOperName(string name) public static string GetNETOperName(string name)