Searched refs:do_code (Results 1 – 2 of 2) sorted by relevance
5720 gfc_code *do_code, *c; in resolve_omp_do() local5795 do_code = code->block->next; in resolve_omp_do()5806 if (do_code->op == EXEC_DO_WHILE) in resolve_omp_do()5809 "at %L", name, &do_code->loc); in resolve_omp_do()5812 if (do_code->op == EXEC_DO_CONCURRENT) in resolve_omp_do()5815 &do_code->loc); in resolve_omp_do()5818 gcc_assert (do_code->op == EXEC_DO); in resolve_omp_do()5819 if (do_code->ext.iterator->var->ts.type != BT_INTEGER) in resolve_omp_do()5821 name, &do_code->loc); in resolve_omp_do()5822 dovar = do_code->ext.iterator->var->symtree->n.sym; in resolve_omp_do()[all …]
8455 gfc_code *do_code, *c; in resolve_omp_do() local8561 do_code = code->block->next; in resolve_omp_do()8572 if (do_code->op == EXEC_DO_WHILE) in resolve_omp_do()8575 "at %L", name, &do_code->loc); in resolve_omp_do()8578 if (do_code->op == EXEC_DO_CONCURRENT) in resolve_omp_do()8581 &do_code->loc); in resolve_omp_do()8584 gcc_assert (do_code->op == EXEC_DO); in resolve_omp_do()8585 if (do_code->ext.iterator->var->ts.type != BT_INTEGER) in resolve_omp_do()8587 name, &do_code->loc); in resolve_omp_do()8588 dovar = do_code->ext.iterator->var->symtree->n.sym; in resolve_omp_do()[all …]