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

#2503

Browse source
This commit is contained in:
Ivan Bondarev 2021-08-29 13:42:32 +02:00
parent c06c28e73f
commit 3416894478
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
TestSuite/question_point2.pas Normal file
View file

@ -0,0 +1,5 @@
begin
var f: function: object;
var o := f?.Invoke;
assert(o = nil);
end.

2
TreeConverter/TreeConversion/semantic_checks_for_sugar.cs
View file

@ -192,7 +192,7 @@ namespace PascalABCCompiler.TreeConverter
t = ctn1.compiled_type;
if (av.type.type_special_kind == SemanticTree.type_special_kind.array_kind)
return;
if (!av.type.is_class && !av.type.IsInterface && !(t != null && t.IsGenericType && t.GetGenericTypeDefinition() == typeof(Nullable<>)) && !av.type.is_generic_parameter)
if (!av.type.is_class && !av.type.IsInterface && !(t != null && t.IsGenericType && t.GetGenericTypeDefinition() == typeof(Nullable<>)) && !av.type.is_generic_parameter && !av.type.IsDelegate)
AddError(av.location, "OPERATOR_DQ_MUST_BE_USED_WITH_A_REFERENCE_TYPE_VALUETYPE");
}