* frontend-passes.c (optimize_code_node): Walk block chain by default.
From-SVN: r164014
This commit is contained in:
parent
19ed9d7bb5
commit
7d124e66ca
|
@ -1,5 +1,7 @@
|
|||
2010-09-08 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
* frontend-passes.c (optimize_code_node): Walk block chain by default.
|
||||
|
||||
PR fortran/45597
|
||||
* trans-openmp.c (gfc_trans_omp_do): Store exit/cycle labels on code
|
||||
instead of code->block.
|
||||
|
|
|
@ -225,8 +225,12 @@ optimize_code_node (gfc_code *c)
|
|||
case EXEC_OMP_TASK:
|
||||
case EXEC_OMP_TASKWAIT:
|
||||
case EXEC_OMP_WORKSHARE:
|
||||
case EXEC_OMP_END_NOWAIT:
|
||||
case EXEC_OMP_END_SINGLE:
|
||||
case EXEC_DEALLOCATE:
|
||||
|
||||
case EXEC_DT_END:
|
||||
for (d = c->block; d; d = d->block)
|
||||
optimize_code (d->next);
|
||||
break;
|
||||
|
||||
default:
|
||||
|
|
Loading…
Reference in New Issue