yield_same_names.pas
This commit is contained in:
parent
34c8271d0f
commit
7059541a44
|
|
@ -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
|
||||
|
|
|
|||
14
TestSuite/yield_same_names.pas
Normal file
14
TestSuite/yield_same_names.pas
Normal 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.
|
||||
Loading…
Reference in a new issue