10 lines
327 B
ObjectPascal
10 lines
327 B
ObjectPascal
type
|
||
T = class
|
||
public static procedure p1(a: integer) := exit;
|
||
|
||
public static procedure P := &Array.ForEach(Arr(0), x -> p1(x)); // В данной версии компилятора не поддерживается замыкание данного типа символов
|
||
end;
|
||
|
||
begin
|
||
Assert(1=1)
|
||
end. |