Searched refs:shape_block (Results 1 – 2 of 2) sorted by relevance
10183 stmtblock_t shape_block; in fcncall_realloc_result() local10217 gfc_start_block (&shape_block); in fcncall_realloc_result()10234 tmp = gfc_evaluate_now (tmp, &shape_block); in fcncall_realloc_result()10247 gfc_add_modify (&shape_block, zero_cond, tmp); in fcncall_realloc_result()10248 tmp = gfc_finish_block (&shape_block); in fcncall_realloc_result()
10726 stmtblock_t shape_block; in fcncall_realloc_result() local10760 gfc_start_block (&shape_block); in fcncall_realloc_result()10777 tmp = gfc_evaluate_now (tmp, &shape_block); in fcncall_realloc_result()10790 gfc_add_modify (&shape_block, zero_cond, tmp); in fcncall_realloc_result()10791 tmp = gfc_finish_block (&shape_block); in fcncall_realloc_result()