pascalabcnet/TestSuite/intellisense_tests/function1.pas
2019-12-25 13:17:32 +01:00

35 lines
817 B
ObjectPascal

function Test(a: integer): integer;
begin
end;
function Test(a: real): integer;
begin
end;
function Test(a: string): integer;
begin
end;
function Test(a: boolean): integer;
begin
end;
function Test(a: List<integer>): integer;
begin
end;
begin
Test{@function Test(a: integer): integer;@}(23);
Test{@function Test(a: real): integer;@}(2.3);
Test{@function Test(a: string): integer;@}('333');
Test{@function Test(a: boolean): integer;@}(true);
Test{@function Test(a: List<integer>): integer;@}(Lst(2,3,4));
Test{(function Test(a: integer): integer;)};
var delim: array of char;
'aa'.Split{@function string.Split(separator: array of char; options: StringSplitOptions): array of string;@}(delim, System.StringSplitOptions.RemoveEmptyEntries);
end.