pascalabcnet/TestSuite/CompilationSamples/ShortFuncInClass.pas
2016-04-12 13:58:42 +03:00

7 lines
147 B
ObjectPascal

type
arrType = array of System.Type;
someClass = class
function ArrTest(arr: arrType) := (arr = nil) or (arr.Length = 0);
end;
begin
end.