pascalabcnet/TestSuite/intellisense_tests/delegates1.pas

7 lines
116 B
ObjectPascal
Raw Permalink Normal View History

2020-12-31 12:26:12 +03:00
procedure Test(a: integer);
begin
end;
begin
var p{@var p: procedure(a: integer);@} := Test+Test;
end.