This commit is contained in:
Mikhalkovich Stanislav 2020-07-09 23:01:39 +03:00
parent bc12063981
commit fe5b3353de
7 changed files with 13 additions and 6 deletions

View file

@ -15,7 +15,7 @@ internal static class RevisionClass
public const string Major = "3";
public const string Minor = "6";
public const string Build = "3";
public const string Revision = "2568";
public const string Revision = "2569";
public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

View file

@ -1,4 +1,4 @@
%COREVERSION%=3
%REVISION%=2568
%MINOR%=6
%REVISION%=2569
%COREVERSION%=3
%MAJOR%=3

Binary file not shown.

View file

@ -1 +1 @@
3.6.3.2568
3.6.3.2569

View file

@ -1 +1 @@
!define VERSION '3.6.3.2568'
!define VERSION '3.6.3.2569'

7
TestSuite/Qpoint1.pas Normal file
View file

@ -0,0 +1,7 @@
// #2280
begin
var a: sequence of object := Seq(object(1));
//Ошибка: Левый операнд операции ?. должен иметь ссылочный тип
var o := a?.First;
Assert(o.Equals(1));
end.

View file

@ -123,7 +123,7 @@ namespace PascalABCCompiler.TreeConverter
else if (av.type is compiled_type_node ctn1)
t = ctn1.compiled_type;
if (!av.type.is_class && !(t.IsGenericType && t.GetGenericTypeDefinition() == typeof(Nullable<>)))
if (!av.type.is_class && !av.type.IsInterface && !(t.IsGenericType && t.GetGenericTypeDefinition() == typeof(Nullable<>)))
AddError(av.location, "OPERATOR_DQ_MUST_BE_USED_WITH_A_REFERENCE_TYPE_VALUETYPE");
}