Lines Matching defs:pre
103 gfc_start_block (&se.pre);
128 gfc_add_modify (&se.pre, len, fold_convert (TREE_TYPE (len), len_tree));
129 gfc_add_modify (&se.pre, addr, label_tree);
131 return gfc_finish_block (&se.pre);
150 gfc_start_block (&se.pre);
155 gfc_trans_runtime_check (true, false, tmp, &se.pre, &loc,
168 gfc_add_expr_to_block (&se.pre, target);
169 return gfc_finish_block (&se.pre);
277 gfc_add_block_to_block (&se->pre, &parmse.pre);
317 tmp = gfc_trans_create_temp_array (&se->pre, &temp_post, tmp_ss,
320 gfc_add_modify (&se->pre, size, tmp);
322 gfc_add_modify (&se->pre, data, tmp);
344 /* parmse.pre is already added above. */
390 gfc_start_block (&se.pre);
423 gfc_add_modify (&se.pre, sym->backend_decl, se.expr);
426 gfc_add_expr_to_block (&se.pre, se.expr);
428 gfc_add_block_to_block (&se.pre, &se.post);
476 gfc_add_block_to_block (&loop.pre, &depse.pre);
502 gfc_add_expr_to_block (&loopse.pre, tmp);
506 gfc_add_modify (&loopse.pre, count1, tmp);
509 gfc_add_expr_to_block (&loopse.pre, loopse.expr);
511 gfc_add_block_to_block (&block, &loopse.pre);
517 gfc_add_block_to_block (&se.pre, &loop.pre);
518 gfc_add_block_to_block (&se.pre, &loop.post);
519 gfc_add_block_to_block (&se.pre, &se.post);
523 return gfc_finish_block (&se.pre);
553 gfc_start_block (&se.pre);
563 gfc_add_expr_to_block (&se.pre, tmp);
564 gfc_add_block_to_block (&se.pre, &se.post);
567 gfc_add_expr_to_block (&se.pre, tmp);
568 return gfc_finish_block (&se.pre);
587 gfc_start_block (&se.pre);
613 gfc_add_expr_to_block (&se.pre, tmp);
615 gfc_add_block_to_block (&se.pre, &se.post);
617 return gfc_finish_block (&se.pre);
632 gfc_start_block (&se.pre);
678 gfc_add_expr_to_block (&se.pre, tmp);
680 gfc_add_block_to_block (&se.pre, &se.post);
682 return gfc_finish_block (&se.pre);
717 gfc_start_block (&se.pre);
724 gfc_add_block_to_block (&se.pre, &argse1.pre);
725 gfc_add_block_to_block (&se.pre, &argse2.pre);
730 gfc_add_expr_to_block (&se.pre, tmp);
731 gfc_add_block_to_block (&se.pre, &argse1.post);
732 gfc_add_block_to_block (&se.pre, &argse2.post);
733 return gfc_finish_block (&se.pre);
761 gfc_add_expr_to_block (&argse.pre, tmp);
762 gfc_add_block_to_block (&argse.pre, &argse.post);
763 return gfc_finish_block (&argse.pre);
812 gfc_add_expr_to_block (&argse.pre, tmp);
813 gfc_add_block_to_block (&argse.pre, &argse.post);
814 return gfc_finish_block (&argse.pre);
857 gfc_start_block (&se.pre);
879 image_index = gfc_caf_get_image_index (&se.pre, code->expr1, caf_decl);
900 gfc_add_block_to_block (&se.pre, &argse.pre);
909 gfc_add_block_to_block (&argse.pre, &argse.pre);
933 gfc_add_block_to_block (&se.pre, &argse.pre);
972 gfc_add_expr_to_block (&se.pre, tmp);
981 gfc_add_expr_to_block (&se.pre, tmp);
984 gfc_add_modify (&se.pre, stat2,
988 gfc_add_modify (&se.pre, lock_acquired2,
992 return gfc_finish_block (&se.pre);
996 gfc_add_modify (&se.pre, stat, build_int_cst (TREE_TYPE (stat), 0));
999 gfc_add_modify (&se.pre, lock_acquired,
1003 return gfc_finish_block (&se.pre);
1034 gfc_start_block (&se.pre);
1039 gfc_add_modify (&se.pre, argse.expr,
1044 gfc_add_modify (&se.pre, argse.expr,
1050 gfc_add_modify (&se.pre, stat, build_int_cst (TREE_TYPE (stat), 0));
1052 return gfc_finish_block (&se.pre);
1055 gfc_start_block (&se.pre);
1074 gfc_add_block_to_block (&se.pre, &argse.pre);
1077 image_index = gfc_caf_get_image_index (&se.pre, code->expr1, caf_decl);
1098 gfc_add_block_to_block (&se.pre, &argse.pre);
1107 gfc_add_block_to_block (&argse.pre, &argse.pre);
1131 gfc_add_block_to_block (&se.pre, &argse.pre);
1160 gfc_add_expr_to_block (&se.pre, tmp);
1168 gfc_add_expr_to_block (&se.pre, tmp);
1171 gfc_add_modify (&se.pre, stat2, fold_convert (TREE_TYPE (stat2), stat));
1173 return gfc_finish_block (&se.pre);
1191 gfc_start_block (&se.pre);
1250 gfc_trans_runtime_check (true, false, cond, &se.pre,
1264 gfc_add_expr_to_block (&se.pre, tmp);
1271 gfc_add_modify (&se.pre, stat, build_int_cst (TREE_TYPE (stat), 0));
1292 gfc_add_expr_to_block (&se.pre, tmp);
1301 gfc_add_expr_to_block (&se.pre, tmp);
1303 gfc_add_modify (&se.pre, stat,
1358 gfc_add_expr_to_block (&se.pre, tmp);
1368 gfc_add_expr_to_block (&se.pre, tmp);
1370 gfc_add_modify (&se.pre, stat,
1375 return gfc_finish_block (&se.pre);
1414 are the pre side-effects produced by the translation of the
1433 gfc_start_block (&if_se.pre);
1462 gfc_add_expr_to_block (&if_se.pre, stmt);
1465 return gfc_finish_block (&if_se.pre);
1523 gfc_start_block (&se.pre);
1527 se.expr = gfc_evaluate_now (se.expr, &se.pre);
1564 gfc_add_expr_to_block (&se.pre, branch1);
1565 return gfc_finish_block (&se.pre);
1799 gfc_add_modify (&se.pre, desc, tmp);
1802 gfc_add_modify (&se.pre, gfc_class_vptr_get (desc), tmp);
1804 gfc_add_modify (&se.pre, gfc_class_len_get (desc),
1814 copy_descriptor (&se.pre, desc, se.expr, rank);
1818 gfc_add_modify (&se.pre, desc,
1863 gfc_add_init_cleanup (block, gfc_finish_block (&se.pre), tmp);
1898 gfc_add_modify (&se.pre, sym->ts.u.cl->backend_decl,
1911 gfc_add_modify (&se.pre, desc, se.expr);
1916 gfc_conv_shift_descriptor_lbound (&se.pre, desc,
1927 gfc_conv_descriptor_span_set (&se.pre, desc, tmp);
1941 gfc_add_init_cleanup (block, gfc_finish_block (&se.pre),
1972 gfc_add_modify (&se.pre, sym->backend_decl,
1976 gfc_add_modify (&se.pre, sym->backend_decl, se.expr);
1983 gfc_add_modify (&se.pre, tmp,
1987 gfc_add_init_cleanup (block, gfc_finish_block (&se.pre),
2046 gfc_add_modify (&se.pre, charlen,
2055 gfc_conv_descriptor_offset_set (&se.pre, desc, offset);
2082 gfc_add_modify (&se.pre, sym->ts.u.cl->backend_decl,
2123 gfc_add_modify (&se.pre, dtmp, stmp);
2127 gfc_add_modify (&se.pre, dtmp, stmp);
2133 gfc_add_modify (&se.pre, dtmp, stmp);
2140 gfc_add_modify (&se.pre, sym->backend_decl, tmp);
2142 gfc_add_init_cleanup (block, gfc_finish_block( &se.pre),
2165 gfc_add_modify (&se.pre, tmp, fold_convert (TREE_TYPE (tmp),
2171 gfc_add_expr_to_block (&se.pre, res);
2207 res = gfc_finish_block (&se.pre);
2237 gfc_add_modify (&se.pre, charlen,
2239 gfc_add_init_cleanup (block, gfc_finish_block (&se.pre),
2313 This helps the optimizers by avoiding the extra pre-header condition and
2516 gfc_add_block_to_block (&block, &se.pre);
2522 gfc_add_block_to_block (&block, &se.pre);
2527 gfc_add_block_to_block (&block, &se.pre);
2532 gfc_add_block_to_block (&block, &se.pre);
2804 gfc_add_block_to_block (&block, &cond.pre);
2870 gfc_add_block_to_block (&block, &se.pre);
2898 gfc_add_block_to_block (&block, &cse.pre);
2906 gfc_add_block_to_block (&block, &cse.pre);
2941 gfc_add_block_to_block (&block, &cse.pre);
3026 gfc_add_block_to_block (&block, &se.pre);
3165 gfc_add_block_to_block (&block, &se.pre);
3252 gfc_add_block_to_block (&block, &expr1se.pre);
3696 gfc_add_block_to_block (&block, &cse.pre);
3823 forall_make_variable_temp (gfc_code *c, stmtblock_t *pre, stmtblock_t *post)
3841 gfc_add_block_to_block (pre, &tse.pre);
3849 gfc_conv_descriptor_offset_set (pre, tse.expr, tmp);
3864 gfc_add_block_to_block (pre, &tse.pre);
3875 gfc_add_expr_to_block (pre, tmp);
3908 check_forall_dependencies (gfc_code *c, stmtblock_t *pre, stmtblock_t *post)
3933 forall_make_variable_temp (c, pre, post);
3954 forall_make_variable_temp (c, pre, post);
4268 gfc_add_block_to_block (&block, &loop.pre);
4382 gfc_add_block_to_block (&block, &loop.pre);
4451 gfc_add_block_to_block (pblock, &loop.pre);
4752 gfc_add_block_to_block (&body, &rse.pre);
4778 gfc_add_block_to_block (&body, &lse.pre);
4822 gfc_add_block_to_block (&body, &lse.pre);
4843 gfc_add_modify (&lse.pre, lse.expr, parm);
4845 gfc_add_block_to_block (&body, &lse.pre);
4908 stmtblock_t pre;
4958 gfc_start_block (&pre);
4986 gfc_add_block_to_block (&block, &se.pre);
4994 gfc_add_block_to_block (&block, &se.pre);
5002 gfc_add_block_to_block (&block, &se.pre);
5094 gfc_add_block_to_block (&body, &se.pre);
5146 need_temp = check_forall_dependencies(c, &pre, &post);
5251 gfc_add_block_to_block (&pre, &block);
5252 gfc_add_block_to_block (&pre, &post);
5254 return gfc_finish_block (&pre);
5344 gfc_add_block_to_block (&body1, &lse.pre);
5345 gfc_add_block_to_block (&body1, &rse.pre);
5394 gfc_add_block_to_block (&body, &loop.pre);
5612 gfc_add_block_to_block (&block, &loop.pre);
5976 gfc_add_block_to_block (&body, &cse.pre);
6005 gfc_add_block_to_block (&block, &loop.pre);
6225 be pre-evaluated in all cases. One just has to make sure, to use the
6311 gfc_add_block_to_block (&block, &se.pre);
6478 gfc_add_block_to_block (&block, &se.pre);
6516 gfc_add_block_to_block (&block, &se_sz.pre);
6683 pre-evaluated expr3 expressions, because for most of them the
6684 scalarizer is needed which is not available in the pre-evaluation
6688 pre-evaluation step. */
6761 gfc_add_block_to_block (&se.pre, &se_sz.pre);
6762 se_sz.expr = gfc_evaluate_now (se_sz.expr, &se.pre);
6763 gfc_add_block_to_block (&se.pre, &se_sz.post);
6812 gfc_add_block_to_block (&se.pre, &caf_se.pre);
6813 gfc_allocate_allocatable (&se.pre, se.expr, memsz,
6820 gfc_allocate_allocatable (&se.pre, se.expr, memsz,
6824 gfc_allocate_using_malloc (&se.pre, se.expr, memsz, stat);
6858 gfc_add_block_to_block (&block, &se_sz.pre);
6866 gfc_add_block_to_block (&block, &se.pre);
6896 /* Although expr3 is pre-evaluated above, it may happen,
6897 that for arrays or in mold= cases the pre-evaluation
6948 gfc_add_block_to_block (&block, &se_sz.pre);
7218 gfc_start_block (&se.pre);
7292 gfc_add_expr_to_block (&se.pre, tmp);
7309 gfc_add_expr_to_block (&se.pre, tmp);
7335 gfc_add_expr_to_block (&se.pre, tmp);
7341 gfc_reset_vptr (&se.pre, al->expr);
7346 gfc_reset_len (&se.pre, al->expr);
7354 gfc_add_expr_to_block (&se.pre, tmp);
7360 gfc_add_expr_to_block (&se.pre, tmp);
7364 gfc_reset_vptr (&se.pre, al->expr);
7369 gfc_reset_len (&se.pre, al->expr);
7383 gfc_add_expr_to_block (&se.pre, tmp);
7386 tmp = gfc_finish_block (&se.pre);