Home | History | Annotate | Download | only in fortran

Lines Matching defs:lse

4222   gfc_se lse;
4232   gfc_init_se (&lse, NULL);
4237       gfc_conv_expr (&lse, expr);
4256       gfc_copy_loopinfo_to_se (&lse, &loop);
4257       lse.ss = lss;
4258       gfc_conv_expr (&lse, expr);
4265   rse.string_length = lse.string_length;
4266   tmp = gfc_trans_scalar_assign (&lse, &rse, expr->ts,
4329   gfc_se lse;
4337   gfc_init_se (&lse, NULL);
4343       lse.expr = gfc_build_array_ref (tmp1, count1, NULL);
4367       lse.expr = gfc_build_array_ref (tmp1, count1, NULL);
4371   lse.string_length = rse.string_length;
4372   tmp = gfc_trans_scalar_assign (&lse, &rse, expr2->ts,
4756   gfc_se lse;
4783       gfc_init_se (&lse, NULL);
4784       lse.expr = gfc_build_array_ref (tmp1, count, NULL);
4789       gfc_add_modify (&body, lse.expr,
4790 			   fold_convert (TREE_TYPE (lse.expr), rse.expr));
4809       gfc_init_se (&lse, NULL);
4812       lse.want_pointer = 1;
4813       gfc_conv_expr (&lse, expr1);
4814       gfc_add_block_to_block (&body, &lse.pre);
4815       gfc_add_modify (&body, lse.expr, rse.expr);
4816       gfc_add_block_to_block (&body, &lse.post);
4853       gfc_init_se (&lse, NULL);
4854       lse.expr = gfc_build_array_ref (tmp1, count, NULL);
4855       lse.direct_byref = 1;
4856       gfc_conv_expr_descriptor (&lse, expr2);
4858       gfc_add_block_to_block (&body, &lse.pre);
4859       gfc_add_block_to_block (&body, &lse.post);
4877       gfc_init_se (&lse, NULL);
4878       gfc_conv_expr_descriptor (&lse, expr1);
4879       gfc_add_modify (&lse.pre, lse.expr, parm);
4881       gfc_add_block_to_block (&body, &lse.pre);
4882       gfc_add_block_to_block (&body, &lse.post);
5331   gfc_se lse, rse;
5346   gfc_init_se (&lse, NULL);
5380   gfc_add_block_to_block (&body1, &lse.pre);
5413   gfc_add_block_to_block (&body1, &lse.post);
5458   gfc_se lse;
5488   gfc_init_se (&lse, NULL);
5535   gfc_copy_loopinfo_to_se (&lse, &loop);
5542       lse.ss = lss;
5547       lse.ss = loop.temp_ss;
5558     gfc_conv_tmp_array_ref (&lse);
5560     gfc_conv_expr (&lse, expr1);
5570   tmp = gfc_trans_scalar_assign (&lse, &rse, expr1->ts,
5589       gcc_assert (lse.ss == gfc_ss_terminator
5602           gfc_init_se (&lse, NULL);
5604           gfc_copy_loopinfo_to_se (&lse, &loop);
5608           lse.ss = lss;
5611           gfc_conv_expr (&lse, expr1);
5613           gcc_assert (lse.ss == gfc_ss_terminator
5624           tmp = gfc_trans_scalar_assign (&lse, &rse, expr1->ts, false, true);