4463   gfc_se arrayse;  in gfc_conv_intrinsic_anyall()  local
4515   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_anyall()
4516   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_anyall()
4517   arrayse.ss = arrayss;  in gfc_conv_intrinsic_anyall()
4518   gfc_conv_expr_val (&arrayse, actual->expr);  in gfc_conv_intrinsic_anyall()
4520   gfc_add_block_to_block (&body, &arrayse.pre);  in gfc_conv_intrinsic_anyall()
4521   tmp = fold_build2_loc (input_location, op, logical_type_node, arrayse.expr,  in gfc_conv_intrinsic_anyall()
4522 			 build_int_cst (TREE_TYPE (arrayse.expr), 0));  in gfc_conv_intrinsic_anyall()
4525   gfc_add_block_to_block (&body, &arrayse.post);  in gfc_conv_intrinsic_anyall()
4730   gfc_se arrayse;  in gfc_conv_intrinsic_count()  local
4765   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_count()
4766   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_count()
4767   arrayse.ss = arrayss;  in gfc_conv_intrinsic_count()
4768   gfc_conv_expr_val (&arrayse, actual->expr);  in gfc_conv_intrinsic_count()
4769   tmp = build3_v (COND_EXPR, arrayse.expr, tmp,  in gfc_conv_intrinsic_count()
4772   gfc_add_block_to_block (&body, &arrayse.pre);  in gfc_conv_intrinsic_count()
4774   gfc_add_block_to_block (&body, &arrayse.post);  in gfc_conv_intrinsic_count()
4836   gfc_se arrayse;  in gfc_conv_intrinsic_arith()  local
4956   gfc_init_se (&arrayse, parent_se);  in gfc_conv_intrinsic_arith()
4957   gfc_copy_loopinfo_to_se (&arrayse, ploop);  in gfc_conv_intrinsic_arith()
4959     arrayse.ss = arrayss;  in gfc_conv_intrinsic_arith()
4960   gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_arith()
4961   gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_arith()
4988 				       arrayse.expr));  in gfc_conv_intrinsic_arith()
5020 			      arrayse.expr,  in gfc_conv_intrinsic_arith()
5028       tmp = fold_build2_loc (input_location, op, type, resvar, arrayse.expr);  in gfc_conv_intrinsic_arith()
5032   gfc_add_block_to_block (&block, &arrayse.post);  in gfc_conv_intrinsic_arith()
5320   gfc_se arrayse;  in gfc_conv_intrinsic_minmaxloc()  local
5523   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxloc()
5524   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxloc()
5525   arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxloc()
5526   gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxloc()
5527   gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxloc()
5537   gfc_add_modify (&ifblock, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxloc()
5570 				logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5580 				  logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5587 				    arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5653       gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxloc()
5654       gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxloc()
5655       arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxloc()
5656       gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxloc()
5657       gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxloc()
5663       gfc_add_modify (&ifblock, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxloc()
5679 				logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5686 				  arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxloc()
5781   gfc_se arrayse;  in gfc_conv_intrinsic_findloc()  local
5919       gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_findloc()
5920       gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_findloc()
5921       arrayse.ss = arrayss;  in gfc_conv_intrinsic_findloc()
5922       gfc_conv_expr_val (&arrayse, array_arg->expr);  in gfc_conv_intrinsic_findloc()
5923       gfc_add_block_to_block (&body, &arrayse.pre);  in gfc_conv_intrinsic_findloc()
5930 			     arrayse.expr, valuese.expr);  in gfc_conv_intrinsic_findloc()
5946       gfc_add_block_to_block (&body, &arrayse.post);  in gfc_conv_intrinsic_findloc()
6104   gfc_se arrayse;  in gfc_conv_intrinsic_minmaxval()  local
6290   gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxval()
6291   gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxval()
6292   arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxval()
6293   gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxval()
6294   gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxval()
6304 			     logical_type_node, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6312 	  gfc_add_modify (&ifblock, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxval()
6326 			     type, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6339 				 arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6340 	  ifbody = build2_v (MODIFY_EXPR, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxval()
6348 				 type, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6357   gfc_add_block_to_block (&block, &arrayse.post);  in gfc_conv_intrinsic_minmaxval()
6396       gfc_init_se (&arrayse, NULL);  in gfc_conv_intrinsic_minmaxval()
6397       gfc_copy_loopinfo_to_se (&arrayse, &loop);  in gfc_conv_intrinsic_minmaxval()
6398       arrayse.ss = arrayss;  in gfc_conv_intrinsic_minmaxval()
6399       gfc_conv_expr_val (&arrayse, arrayexpr);  in gfc_conv_intrinsic_minmaxval()
6400       gfc_add_block_to_block (&block, &arrayse.pre);  in gfc_conv_intrinsic_minmaxval()
6407 				 arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6408 	  ifbody = build2_v (MODIFY_EXPR, limit, arrayse.expr);  in gfc_conv_intrinsic_minmaxval()
6417 				 type, arrayse.expr, limit);  in gfc_conv_intrinsic_minmaxval()
6421       gfc_add_block_to_block (&block, &arrayse.post);  in gfc_conv_intrinsic_minmaxval()