administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fix #1819

Browse source
This commit is contained in:
Бондарев Иван 2019-03-10 15:07:29 +01:00
parent 7b59b46091
commit f6448d1fdf
2 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
CodeCompletion/DomSyntaxTreeVisitor.cs
View file

@ -4631,6 +4631,8 @@ namespace CodeCompletion
if (returned_scope != null)
{
cur_scope = stmt_scope;
if (returned_scope is ProcScope)
returned_scope = new ProcType(returned_scope as ProcScope);
ElementScope es = new ElementScope(new SymInfo(_foreach_stmt.identifier.name, SymbolKind.Variable, _foreach_stmt.identifier.name), returned_scope, cur_scope);
es.loc = get_location(_foreach_stmt.identifier);
stmt_scope.AddName(_foreach_stmt.identifier.name, es);

4
TestSuite/intellisense_tests/foreach5.pas Normal file
View file

@ -0,0 +1,4 @@
begin
foreach var item{@var item: procedure;@}: procedure in Arr&<procedure>() do; // ()
foreach var item{@var item: procedure(x: byte);@}: procedure(x: byte) in Arr&<procedure(x: byte)>() do; // (x: byte)
end.