8 lines
117 B
ObjectPascal
8 lines
117 B
ObjectPascal
|
procedure Test(a: integer);
|
||
|
|
begin
|
||
|
|
|
||
|
|
end;
|
||
|
|
begin
|
||
|
|
var p{@var p: procedure(a: integer);@} := Test+Test;
|
||
|
|
|
||
|
|
end.
|