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

bug fix #346

Browse source
This commit is contained in:
Бондарев Иван 2017-02-18 14:22:22 +01:00
parent 9900ad6277
commit 0dc1922496
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
TreeConverter/TreeConversion/compilation_context.cs
View file

@ -226,6 +226,7 @@ namespace PascalABCCompiler.TreeConverter
}
}
private int _num_for_delegates;
private int _num_of_for_cycles;
internal convertion_data_and_alghoritms convertion_data_and_alghoritms;
@ -276,6 +277,7 @@ namespace PascalABCCompiler.TreeConverter
_cycles_stack.clear();
_num_of_for_cycles = 0;
_fal = SemanticTree.field_access_level.fal_private;
_num_for_delegates = 0;
rec_num = 1;
var_defs_stack.Clear();
type_stack.Clear();
@ -1791,7 +1793,7 @@ namespace PascalABCCompiler.TreeConverter
public string get_delegate_type_name()
{
return (compiler_string_consts.delegate_type_name_template+get_and_postinc_num_of_for_cycles());
return (compiler_string_consts.delegate_type_name_template + _num_for_delegates++);
}
public var_definition_node create_for_temp_variable(type_node type,location loc)