10 lines
133 B
ObjectPascal
10 lines
133 B
ObjectPascal
procedure p1;
|
|
begin
|
|
var o: object;
|
|
var p: procedure := procedure -> begin
|
|
(new object[](o)).Sort;
|
|
end;
|
|
end;
|
|
|
|
begin
|
|
end. |