4314   gfc_se arrayse;  in gfc_conv_intrinsic_anyall()  local
4366   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_anyall()
4367   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_anyall()
4368   arrayse.ss = arrayss;  in gfc_conv_intrinsic_anyall()
4369   gfc_conv_expr_val (&arrayse, actual->expr);  in gfc_conv_intrinsic_anyall()
4371   gfc_add_block_to_block (&body, &arrayse.pre);  in gfc_conv_intrinsic_anyall()
4372   tmp = fold_build2_loc (input_location, op, logical_type_node, arrayse.expr,  in gfc_conv_intrinsic_anyall()
4373 			 build_int_cst (TREE_TYPE (arrayse.expr), 0));  in gfc_conv_intrinsic_anyall()
4376   gfc_add_block_to_block (&body, &arrayse.post);  in gfc_conv_intrinsic_anyall()
4581   gfc_se arrayse;  in gfc_conv_intrinsic_count()  local
4616   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_count()
4617   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_count()
4618   arrayse.ss = arrayss;  in gfc_conv_intrinsic_count()
4619   gfc_conv_expr_val (&arrayse, actual->expr);  in gfc_conv_intrinsic_count()
4620   tmp = build3_v (COND_EXPR, arrayse.expr, tmp,  in gfc_conv_intrinsic_count()
4623   gfc_add_block_to_block (&body, &arrayse.pre);  in gfc_conv_intrinsic_count()
4625   gfc_add_block_to_block (&body, &arrayse.post);  in gfc_conv_intrinsic_count()
4687   gfc_se arrayse;  in gfc_conv_intrinsic_arith()  local
4807   gfc_init_se (&arrayse, parent_se);  in gfc_conv_intrinsic_arith()
4808   gfc_copy_loopinfo_to_se (&arrayse, ploop);  in gfc_conv_intrinsic_arith()
4810     arrayse.ss = arrayss;  in gfc_conv_intrinsic_arith()
4811   gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_arith()
4812   gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_arith()
4839 				       arrayse.expr));  in gfc_conv_intrinsic_arith()
4871 			      arrayse.expr,  in gfc_conv_intrinsic_arith()
4879       tmp = fold_build2_loc (input_location, op, type, resvar, arrayse.expr);  in gfc_conv_intrinsic_arith()
4883   gfc_add_block_to_block (&block, &arrayse.post);  in gfc_conv_intrinsic_arith()
5173   gfc_se arrayse;  in gfc_conv_intrinsic_minmaxloc()  local
5379   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxloc()
5380   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxloc()
5381   arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxloc()
5382   gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxloc()
5383   gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxloc()
5393   gfc_add_modify (&ifblock, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxloc()
5426 				logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5436 				  logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5443 				    arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5509       gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxloc()
5510       gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxloc()
5511       arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxloc()
5512       gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxloc()
5513       gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxloc()
5519       gfc_add_modify (&ifblock, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxloc()
5535 				logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5542 				  arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5637   gfc_se arrayse;  in gfc_conv_intrinsic_findloc()  local
5775       gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_findloc()
5776       gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_findloc()
5777       arrayse.ss = arrayss;  in gfc_conv_intrinsic_findloc()
5778       gfc_conv_expr_val (&arrayse, array_arg->expr);  in gfc_conv_intrinsic_findloc()
5779       gfc_add_block_to_block (&body, &arrayse.pre);  in gfc_conv_intrinsic_findloc()
5786 			     arrayse.expr, valuese.expr);  in gfc_conv_intrinsic_findloc()
5802       gfc_add_block_to_block (&body, &arrayse.post);  in gfc_conv_intrinsic_findloc()
5960   gfc_se arrayse;  in gfc_conv_intrinsic_minmaxval()  local
6159   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxval()
6160   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxval()
6161   arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxval()
6162   gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxval()
6163   gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxval()
6173 			     logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6181 	  gfc_add_modify (&ifblock, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxval()
6195 			     type, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6208 				 arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6209 	  ifbody = build2_v (MODIFY_EXPR, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxval()
6217 				 type, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6226   gfc_add_block_to_block (&block, &arrayse.post);  in gfc_conv_intrinsic_minmaxval()
6265       gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxval()
6266       gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxval()
6267       arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxval()
6268       gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxval()
6269       gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxval()
6276 				 arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6277 	  ifbody = build2_v (MODIFY_EXPR, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxval()
6286 				 type, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6290       gfc_add_block_to_block (&block, &arrayse.post);  in gfc_conv_intrinsic_minmaxval()