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

bug fix #443

Browse source
This commit is contained in:
Бондарев Иван 2017-07-07 18:30:57 +02:00
parent 16634d41d8
commit e4aaf57b99
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Optimizer/Optimizer.cs
View file

@ -554,12 +554,14 @@ namespace PascalABCCompiler
{
if (is_break_stmt && !has_goto && stmt.statements[i].semantic_node_type != semantic_node_type.empty_statement)
warns.Add(new UnreachableCodeDetected(stmt.statements[i].location));
is_break_stmt = false;
if (stmt.statements[i].semantic_node_type != semantic_node_type.empty_statement)
is_break_stmt = false;
sn = stmt.statements[i];
VisitStatement(sn);
if (is_break_stmt && !has_goto && i < stmt.statements.Count - 1 && stmt.statements[i + 1].semantic_node_type != semantic_node_type.empty_statement)
warns.Add(new UnreachableCodeDetected(stmt.statements[i + 1].location));
is_break_stmt = false;
if (!(i < stmt.statements.Count - 1 && stmt.statements[i + 1].semantic_node_type == semantic_node_type.empty_statement))
is_break_stmt = false;
}
foreach (local_block_variable vdn in stmt.local_variables)
{