add generics10.pas in test suite (for #360)

This commit is contained in:
Бондарев Иван 2017-03-02 20:32:52 +01:00
parent 22e529d3bd
commit 7b31f586e3
2 changed files with 6 additions and 1 deletions

View file

@ -2205,7 +2205,7 @@ namespace CodeCompletion
#endif
}
}
if (_program_module.program_block.program_code != null)
if (cur_scope != null && _program_module.program_block.program_code != null)
{
cur_scope.body_loc = new location(_program_module.program_block.program_code.left_logical_bracket.source_context.end_position.line_num,
_program_module.program_block.program_code.left_logical_bracket.source_context.end_position.column_num,

5
TestSuite/generics10.pas Normal file
View file

@ -0,0 +1,5 @@
begin
var arr := Range(1,5).Select(i->i.ToString).ToArray;
assert(arr[0] = '1');
assert(arr[4] = '5');
end.