8 lines
108 B
ObjectPascal
8 lines
108 B
ObjectPascal
|
function Test: sequence of integer->integer;
|
||
|
|
begin
|
||
|
|
yield nil;
|
||
|
|
end;
|
||
|
|
|
||
|
|
begin
|
||
|
|
assert(Test.First = nil);
|
||
|
|
end.
|