yield_same_names.pas

This commit is contained in:
Mikhalkovich Stanislav 2019-07-11 23:21:02 +03:00
parent 34c8271d0f
commit 7059541a44
2 changed files with 16 additions and 2 deletions

View file

@ -66,7 +66,7 @@ namespace PascalABCCompiler.SyntaxTreeConverters
cv.ProcessNode(root);
cv.Output(@"Light1.txt");*/
try
/*try
{
root.visit(new SimplePrettyPrinterVisitor(@"d:\\zzz1.txt"));
}
@ -74,7 +74,7 @@ namespace PascalABCCompiler.SyntaxTreeConverters
{
System.IO.File.AppendAllText(@"d:\\zzz1.txt",e.Message);
}
}*/
#endif

View file

@ -0,0 +1,14 @@
function MyStep(Self: real; mystep: real): sequence of real; extensionmethod;
begin
yield mystep;
end;
function YourStep(yourstep: real): sequence of real;
begin
yield yourstep;
end;
begin
var a := 0.0.Step(0.3);
end.