b xor i
This commit is contained in:
parent
323ba75b89
commit
b333fd6b04
|
|
@ -15,7 +15,7 @@ internal static class RevisionClass
|
|||
public const string Major = "3";
|
||||
public const string Minor = "5";
|
||||
public const string Build = "0";
|
||||
public const string Revision = "2169";
|
||||
public const string Revision = "2170";
|
||||
|
||||
public const string MainVersion = Major + "." + Minor;
|
||||
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
%MINOR%=5
|
||||
%REVISION%=2169
|
||||
%COREVERSION%=0
|
||||
%REVISION%=2170
|
||||
%MINOR%=5
|
||||
%MAJOR%=3
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
!define VERSION '3.5.0.2169'
|
||||
!define VERSION '3.5.0.2170'
|
||||
|
|
|
|||
6
TestSuite/xor_byte_int.pas
Normal file
6
TestSuite/xor_byte_int.pas
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
begin
|
||||
var b: byte := 255;
|
||||
var i: int64 := 256;
|
||||
Assert(b xor i = 511);
|
||||
Assert(i xor b = 511);
|
||||
end.
|
||||
|
|
@ -2082,7 +2082,9 @@ namespace PascalABCCompiler.TreeConverter
|
|||
//Тупая заглушка для примитивных типов. иначе не работает +=, у нас лишком много неявных приведений
|
||||
//в дальнейшем может вызвать странное поведение, это надо проверить
|
||||
if (set_of_possible_functions.Count == 2 && indefinits.Count == 0)
|
||||
if (set_of_possible_functions[0] is basic_function_node && set_of_possible_functions[1] is basic_function_node)
|
||||
if (set_of_possible_functions[0] is basic_function_node && set_of_possible_functions[1] is basic_function_node
|
||||
// добавил это условие из-за комментария. Не понимаю, почему иначе не работает +=. Все тесты проходят 01.07.19 если закомментировать вообще этот if !!!
|
||||
&& set_of_possible_functions[0].name == "+=" && set_of_possible_functions[1].name == "+=")
|
||||
return set_of_possible_functions[0];
|
||||
|
||||
if (indefinits.Count > 0)
|
||||
|
|
|
|||
Loading…
Reference in a new issue