pascalabcnet/TestSuite/yi1.pas
Mikhalkovich Stanislav 1946c710f7 fix #2103
2020-06-10 09:09:56 +03:00

10 lines
121 B
ObjectPascal

function f1: sequence of byte;
begin
var action: System.Action;
yield 2;
end;
begin
Assert(f1.First=2)
end.