8 lines
104 B
ObjectPascal
8 lines
104 B
ObjectPascal
begin
|
|
var p: ()->boolean := ()->
|
|
begin
|
|
case 0 of
|
|
0: Result := true;
|
|
end
|
|
end;
|
|
end. |