Home | History | Annotate | Download | only in fortran

Lines Matching refs:loop_var

2366   tree type, desc, dim_arg, cond, tmp, m, loop_var, exit_label, min_var,
2507   loop_var = gfc_create_var (integer_type_node, NULL);
2524   gfc_add_modify (&se->pre, loop_var, tmp);
2536   lbound = gfc_conv_descriptor_lbound_get (desc, loop_var);
2537 loop_var);
2547   cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node, loop_var,
2555   gfc_add_modify (&loop, loop_var,
2557 				   loop_var,
8141 	  tree cond, loop_var, exit_label;
8146 	  loop_var = gfc_create_var (gfc_array_index_type, "i");
8147 	  gfc_add_modify (&argse.pre, loop_var, gfc_index_zero_node);
8161 				  loop_var, tmp);
8167 	  lower = gfc_conv_descriptor_lbound_get (argse.expr, loop_var);
8168 	  upper = gfc_conv_descriptor_ubound_get (argse.expr, loop_var);
8175 				 gfc_array_index_type, loop_var,
8177 	  gfc_add_modify_loc (input_location, &body, loop_var, tmp);