Lines Matching refs:loopse
221 gfc_conv_elemental_dependencies (gfc_se * se, gfc_se * loopse, in gfc_conv_elemental_dependencies() argument
235 if (loopse->ss == NULL) in gfc_conv_elemental_dependencies()
238 ss = loopse->ss; in gfc_conv_elemental_dependencies()
250 for (ss = loopse->ss; ss && ss != gfc_ss_terminator; ss = ss->next) in gfc_conv_elemental_dependencies()
271 replace_ss (loopse, ss, tmp_ss); in gfc_conv_elemental_dependencies()
325 gfc_set_delta (loopse->loop); in gfc_conv_elemental_dependencies()
438 gfc_se loopse; in gfc_trans_call() local
446 gfc_init_se (&loopse, NULL); in gfc_trans_call()
463 gfc_copy_loopinfo_to_se (&loopse, &loop); in gfc_trans_call()
464 loopse.ss = ss; in gfc_trans_call()
473 gfc_conv_elemental_dependencies (&depse, &loopse, code->resolved_sym, in gfc_trans_call()
494 gfc_conv_procedure_call (&loopse, code->resolved_sym, in gfc_trans_call()
500 tmp = build3_v (COND_EXPR, maskexpr, loopse.expr, in gfc_trans_call()
502 gfc_add_expr_to_block (&loopse.pre, tmp); in gfc_trans_call()
506 gfc_add_modify (&loopse.pre, count1, tmp); in gfc_trans_call()
509 gfc_add_expr_to_block (&loopse.pre, loopse.expr); in gfc_trans_call()
511 gfc_add_block_to_block (&block, &loopse.pre); in gfc_trans_call()
512 gfc_add_block_to_block (&block, &loopse.post); in gfc_trans_call()