Lines Matching refs:input_location
320 tmp = build_call_expr_loc (input_location,
342 args[0] = fold_build1_loc (input_location, REALPART_EXPR, artype,
369 cond = fold_build2_loc (input_location, up ? GE_EXPR : LE_EXPR,
372 tmp = fold_build2_loc (input_location, up ? PLUS_EXPR : MINUS_EXPR, type,
374 tmp = fold_build3_loc (input_location, COND_EXPR, type, cond, intval, tmp);
409 return convert (restype, build_call_expr_loc (input_location,
434 return fold_build1_loc (input_location, FIX_TRUNC_EXPR, type, arg);
490 se->expr = build_call_expr_loc (input_location, decl, 1, arg[0]);
505 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node, arg[0],
510 tmp = fold_build2_loc (input_location, GT_EXPR, logical_type_node, arg[0],
512 cond = fold_build2_loc (input_location, TRUTH_AND_EXPR, logical_type_node,
518 se->expr = fold_build3_loc (input_location, COND_EXPR, type, cond, tmp,
557 args[0] = fold_build1_loc (input_location, REALPART_EXPR, artype,
574 se->expr = fold_build1_loc (input_location, IMAGPART_EXPR,
587 se->expr = fold_build1_loc (input_location, CONJ_EXPR, TREE_TYPE (arg), arg);
596 fndecl = build_decl (input_location, FUNCTION_DECL, get_identifier (name),
897 fndecl = build_decl (input_location,
950 se->expr = build_call_array_loc (input_location, rettype, fndecl, num_args, args);
970 cond = fold_build2_loc (input_location, NE_EXPR, logical_type_node, a, b);
1002 cond = build_call_expr_loc (input_location,
1007 tmp = build_call_expr_loc (input_location, frexp, 2, arg,
1009 tmp = fold_build2_loc (input_location, COMPOUND_EXPR, integer_type_node,
1011 se->expr = fold_build3_loc (input_location, COND_EXPR, integer_type_node,
1046 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1052 desc = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1058 desc = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1066 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1070 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1078 input_location, COMPONENT_REF, TREE_TYPE (field),
1083 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1088 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1160 nvec = fold_build2_loc (input_location, TRUNC_DIV_EXPR,
1256 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1271 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1279 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1283 inner_struct = fold_build3_loc (input_location, COMPONENT_REF,
1289 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1302 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1316 tmp2 = fold_build2_loc (input_location, PLUS_EXPR,
1339 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1349 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1353 inner_struct = fold_build3_loc (input_location, COMPONENT_REF,
1362 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1370 mode = fold_build3_loc (input_location, COMPONENT_REF,
1375 dim_array = fold_build3_loc (input_location, COMPONENT_REF,
1526 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1535 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1547 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1559 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1583 nvec = fold_build2_loc (input_location, TRUNC_DIV_EXPR,
1589 tmp = fold_build3_loc (input_location, COMPONENT_REF,
1595 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1603 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1611 tmp2 = fold_build3_loc (input_location, COMPONENT_REF,
1641 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1652 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
1774 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
1786 tmp = build5_loc (input_location, ASM_EXPR, void_type_node,
1793 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_get_by_ref,
1896 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
1907 tmp = build5_loc (input_location, ASM_EXPR, void_type_node,
1913 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_get, 10,
1982 tmp = build_fold_indirect_ref_loc (input_location, lhs_se.expr);
2014 tmp = build_fold_indirect_ref_loc (input_location, lhs_se.expr);
2075 tmp = fold_build2_loc (input_location, MINUS_EXPR,
2077 tmp = fold_build2_loc (input_location, PLUS_EXPR,
2080 stride = fold_build2_loc (input_location, MINUS_EXPR,
2083 stride = fold_build2_loc (input_location, PLUS_EXPR,
2087 index = fold_build2_loc (input_location, MULT_EXPR,
2091 index = fold_build2_loc (input_location, MINUS_EXPR,
2095 index = fold_build2_loc (input_location, PLUS_EXPR,
2140 tmp = fold_build3_loc (input_location, COND_EXPR, void_type_node,
2142 build_empty_stmt (input_location));
2163 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
2196 tmp = build_fold_indirect_ref_loc (input_location, rhs_se.expr);
2225 tmp = build_fold_indirect_ref_loc (input_location, rhs_se.expr);
2274 tmp = build_call_expr_loc (input_location,
2283 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_send, 11,
2294 tmp = build5_loc (input_location, ASM_EXPR, void_type_node,
2302 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
2324 tmp = build_call_expr_loc (input_location,
2339 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_sendget,
2352 tmp = build5_loc (input_location, ASM_EXPR, void_type_node,
2392 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_this_image, 1,
2422 dim_arg = fold_build2_loc (input_location, PLUS_EXPR,
2449 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
2453 tmp = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
2455 cond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
2488 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_this_image, 1,
2490 tmp = fold_build2_loc (input_location, MINUS_EXPR, type,
2499 tmp = fold_build2_loc (input_location, PLUS_EXPR, type, tmp, lbound);
2514 tmp = fold_build2_loc (input_location, PLUS_EXPR, integer_type_node,
2517 tmp = fold_build2_loc (input_location, MIN_EXPR, integer_type_node,
2543 fold_build2_loc (input_location, TRUNC_DIV_EXPR, type,
2547 cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node, loop_var,
2550 tmp = fold_build3_loc (input_location, COND_EXPR, void_type_node, cond, tmp,
2551 build_empty_stmt (input_location));
2556 fold_build2_loc (input_location, PLUS_EXPR, integer_type_node,
2572 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node, dim_arg,
2576 fold_build2_loc (input_location, PLUS_EXPR,
2581 tmp = fold_build2_loc (input_location, MINUS_EXPR, type, ml,
2582 fold_build2_loc (input_location, MULT_EXPR, type,
2584 tmp = fold_build2_loc (input_location, PLUS_EXPR, type, tmp, lbound);
2586 se->expr = fold_build3_loc (input_location, COND_EXPR, type, cond, tmp,
2587 fold_build2_loc (input_location, PLUS_EXPR, type,
2610 tmp = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
2613 tmp = fold_build3_loc (input_location, COND_EXPR, integer_type_node,
2619 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_image_status, 2,
2644 tmp = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
2647 tmp = fold_build3_loc (input_location, COND_EXPR, integer_type_node,
2658 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_team_number, 1,
2661 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_team_number, 1,
2695 subdesc = build_fold_indirect_ref_loc (input_location,
2703 invalid_bound = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
2712 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
2715 invalid_bound = fold_build2_loc (input_location, TRUTH_OR_EXPR,
2717 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
2720 invalid_bound = fold_build2_loc (input_location, TRUTH_OR_EXPR,
2733 coindex = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
2747 coindex = fold_build2_loc (input_location, MULT_EXPR,
2752 coindex = fold_build2_loc (input_location, PLUS_EXPR,
2758 coindex = fold_build2_loc (input_location, MINUS_EXPR,
2762 coindex = fold_build2_loc (input_location, PLUS_EXPR, type,
2772 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_num_images, 2,
2781 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node, tmp,
2783 cond = fold_build2_loc (input_location, TRUTH_OR_EXPR, logical_type_node,
2786 se->expr = fold_build3_loc (input_location, COND_EXPR, type, cond,
2817 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_num_images, 2,
2886 fncall0 = build_call_expr_loc (input_location,
2898 cond = fold_build2_loc (input_location, EQ_EXPR, boolean_type_node,
2905 extent = fold_build2_loc (input_location, MINUS_EXPR,
2907 extent = fold_build2_loc (input_location, PLUS_EXPR,
2911 tmp = fold_build2_loc (input_location, MULT_EXPR, TREE_TYPE (tmp),
2914 tmp = fold_build2_loc (input_location, EQ_EXPR, boolean_type_node,
2916 cond = fold_build2_loc (input_location, TRUTH_AND_EXPR,
2955 bound = fold_build2_loc (input_location, MINUS_EXPR,
2968 bound = fold_build2_loc (input_location, MINUS_EXPR,
3002 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
3008 input_location, GE_EXPR, logical_type_node,
3010 cond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
3029 size = fold_build2_loc (input_location, MINUS_EXPR,
3031 size = fold_build2_loc (input_location, PLUS_EXPR,
3061 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
3063 se->expr = fold_build3_loc (input_location, COND_EXPR,
3070 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
3074 cond1 = fold_build2_loc (input_location, EQ_EXPR,
3078 cond = fold_build2_loc (input_location, TRUTH_OR_EXPR,
3081 se->expr = fold_build3_loc (input_location, COND_EXPR,
3086 se->expr = fold_build2_loc (input_location, MAX_EXPR,
3101 rank = fold_build2_loc (input_location, PLUS_EXPR,
3110 cond1 = fold_build2_loc (input_location, EQ_EXPR,
3112 cond = fold_build2_loc (input_location, EQ_EXPR,
3114 cond = fold_build2_loc (input_location, TRUTH_AND_EXPR,
3116 se->expr = fold_build3_loc (input_location, COND_EXPR,
3125 se->expr = fold_build2_loc (input_location, MAX_EXPR,
3176 bound = fold_build2_loc (input_location, PLUS_EXPR, gfc_array_index_type,
3201 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
3204 tmp = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
3206 cond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
3217 bound = fold_build2_loc (input_location, MINUS_EXPR,
3223 bound = fold_build2_loc (input_location, PLUS_EXPR,
3247 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_num_images,
3250 tmp = fold_build2_loc (input_location, MINUS_EXPR,
3254 tmp = fold_build2_loc (input_location, TRUNC_DIV_EXPR,
3257 resbound = fold_build2_loc (input_location, PLUS_EXPR,
3263 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_num_images,
3266 tmp = fold_build2_loc (input_location, MINUS_EXPR,
3270 resbound = fold_build2_loc (input_location, PLUS_EXPR,
3276 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
3282 se->expr = fold_build3_loc (input_location, COND_EXPR,
3320 tmp = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
3336 se->expr = fold_build1_loc (input_location, ABS_EXPR, TREE_TYPE (arg),
3342 se->expr = build_call_expr_loc (input_location, cabs, 1, arg);
3372 imag = fold_build1_loc (input_location, IMAGPART_EXPR,
3379 se->expr = fold_build2_loc (input_location, COMPLEX_EXPR, type, real, imag);
3411 se->expr = fold_build2_loc (input_location, FLOOR_MOD_EXPR, type,
3414 se->expr = fold_build2_loc (input_location, TRUNC_MOD_EXPR, type,
3427 se->expr = build_call_array_loc (input_location,
3464 test = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
3466 test2 = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
3468 test2 = fold_build2_loc (input_location, TRUTH_XOR_EXPR,
3470 test = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
3472 test = fold_build2_loc (input_location, TRUTH_AND_EXPR,
3475 se->expr = fold_build3_loc (input_location, COND_EXPR, type, test,
3476 fold_build2_loc (input_location,
3486 test = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
3488 test2 = fold_build2_loc (input_location, LT_EXPR, logical_type_node,
3490 test2 = fold_build2_loc (input_location, TRUTH_XOR_EXPR,
3492 expr1 = fold_build3_loc (input_location, COND_EXPR, type, test2,
3493 fold_build2_loc (input_location,
3497 test = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
3499 cscall = build_call_expr_loc (input_location, copysign, 2, zero,
3501 se->expr = fold_build3_loc (input_location, COND_EXPR, type, test,
3541 tmp = fold_build2_loc (input_location, MINUS_EXPR, stype,
3543 left = fold_build2_loc (input_location, LSHIFT_EXPR, type,
3546 right = fold_build2_loc (input_location, RSHIFT_EXPR, utype,
3550 res = fold_build2_loc (input_location, BIT_IOR_EXPR, type, left, right);
3553 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, shift,
3555 res = fold_build3_loc (input_location, COND_EXPR, type, cond,
3558 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, shift,
3560 res = fold_build3_loc (input_location, COND_EXPR, type, cond,
3581 val = fold_build2_loc (input_location, MINUS_EXPR, type, args[0], args[1]);
3585 tmp = fold_build2_loc (input_location, LE_EXPR, logical_type_node, val, zero);
3586 se->expr = fold_build3_loc (input_location, COND_EXPR, type, tmp, zero, val);
3618 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
3620 se->expr = fold_build3_loc (input_location, COND_EXPR,
3622 build_call_expr_loc (input_location, abs, 1,
3624 build_call_expr_loc (input_location, tmp, 2,
3628 se->expr = build_call_expr_loc (input_location, tmp, 2,
3642 tmp = fold_build2_loc (input_location, BIT_XOR_EXPR, type, args[0], args[1]);
3643 tmp = fold_build2_loc (input_location, RSHIFT_EXPR, type, tmp,
3649 se->expr = fold_build2_loc (input_location, BIT_XOR_EXPR, type,
3650 fold_build2_loc (input_location, PLUS_EXPR,
3683 se->expr = fold_build2_loc (input_location, MULT_EXPR, type, args[0],
3704 arg[0] = fold_build1_loc (input_location, NOP_EXPR, type, arg[0]);
3733 tmp = build_call_array_loc (input_location,
3739 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
3742 tmp = build3_v (COND_EXPR, cond, tmp, build_empty_stmt (input_location));
3772 tmp = build_call_array_loc (input_location,
3778 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
3781 tmp = build3_v (COND_EXPR, cond, tmp, build_empty_stmt (input_location));
3803 call = build_call_expr_loc (input_location,
3842 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_random_init,
3851 tmp = build_call_expr_loc (input_location, gfor_fndecl_random_init,
3969 tmp = build_call_expr_loc (input_location,
3982 tmp = build_call_expr_loc (input_location,
4033 tmp = build_call_array_loc (input_location,
4039 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
4042 tmp = build3_v (COND_EXPR, cond, tmp, build_empty_stmt (input_location));
4112 cond = fold_build2_loc (input_location,
4129 calc = fold_build2_loc (input_location, code, argtype,
4135 build_empty_stmt (input_location));
4172 tmp = build_call_array_loc (input_location,
4178 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
4181 tmp = build3_v (COND_EXPR, cond, tmp, build_empty_stmt (input_location));
4521 tmp = fold_build2_loc (input_location, op, logical_type_node, arrayse.expr,
4523 tmp = build3_v (COND_EXPR, tmp, found, build_empty_stmt (input_location));
4606 atrigd = build_call_expr_loc (input_location, atrigd, 1, arg);
4608 se->expr = fold_build2_loc (input_location, MULT_EXPR, type, atrigd,
4643 tmp = fold_build2_loc (input_location, PLUS_EXPR, type, arg, tmp);
4644 tan = build_call_expr_loc (input_location, tan, 1, tmp);
4645 se->expr = fold_build1_loc (input_location, NEGATE_EXPR, type, tan);
4655 cos = build_call_expr_loc (input_location, cos, 1, arg);
4660 sin = build_call_expr_loc (input_location, sin, 1, arg);
4663 se->expr = fold_build2_loc (input_location, RDIV_EXPR, type, cos, sin);
4686 arg = fold_build2_loc (input_location, PLUS_EXPR, type, arg, ninety_tree);
4692 tand = build_call_expr_loc (input_location, tand, 1, arg);
4694 se->expr = fold_build1_loc (input_location, NEGATE_EXPR, type, tand);
4712 atan2d = build_call_expr_loc (input_location, atan2d, 2, args[0], args[1]);
4714 se->expr = fold_build2_loc (input_location, MULT_EXPR, type, atan2d,
4761 tmp = fold_build2_loc (input_location, PLUS_EXPR, TREE_TYPE (resvar),
4770 build_empty_stmt (input_location));
4812 present = fold_build1_loc (input_location, TRUTH_NOT_EXPR, type,
4814 return fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
4869 tmp = gfc_build_const (type, fold_build1_loc (input_location, NEGATE_EXPR,
4987 fold_build1_loc (input_location, ABS_EXPR, type,
4994 fold_build2_loc (input_location, RDIV_EXPR, type, scale,
4996 res1 = fold_build2_loc (input_location, MULT_EXPR, type, val, val);
4997 res1 = fold_build2_loc (input_location, MULT_EXPR, type, resvar, res1);
4998 res1 = fold_build2_loc (input_location, PLUS_EXPR, type, res1,
5006 fold_build2_loc (input_location, RDIV_EXPR, type, absX,
5008 res2 = fold_build2_loc (input_location, MULT_EXPR, type, val, val);
5009 res2 = fold_build2_loc (input_location, PLUS_EXPR, type, resvar, res2);
5013 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
5019 cond = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
5023 tmp = build3_v (COND_EXPR, cond, tmp, build_empty_stmt (input_location));
5028 tmp = fold_build2_loc (input_location, op, type, resvar, arrayse.expr);
5043 build_empty_stmt (input_location));
5062 build_empty_stmt (input_location));
5074 build_empty_stmt (input_location));
5095 resvar = build_call_expr_loc (input_location,
5097 resvar = fold_build2_loc (input_location, MULT_EXPR, type, scale, resvar);
5165 arrayse1.expr = fold_build1_loc (input_location, CONJ_EXPR, type,
5179 tmp = fold_build2_loc (input_location, TRUTH_AND_EXPR, type,
5181 tmp = fold_build2_loc (input_location, TRUTH_OR_EXPR, type, resvar, tmp);
5185 tmp = fold_build2_loc (input_location, MULT_EXPR, type, arrayse1.expr,
5187 tmp = fold_build2_loc (input_location, PLUS_EXPR, type, resvar, tmp);
5380 nonempty = fold_build2_loc (input_location, GT_EXPR,
5409 tmp = fold_build1_loc (input_location, NEGATE_EXPR, TREE_TYPE (tmp), tmp);
5411 tmp = fold_build2_loc (input_location, MINUS_EXPR, TREE_TYPE (tmp), tmp,
5451 nonempty = fold_build2_loc (input_location, LE_EXPR, logical_type_node,
5463 fold_build3_loc (input_location, COND_EXPR,
5480 tmp = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
5527 tmp = fold_build2_loc (input_location, PLUS_EXPR, TREE_TYPE (pos),
5531 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, pos,
5534 build_empty_stmt (input_location));
5538 tmp = fold_build2_loc (input_location, PLUS_EXPR, TREE_TYPE (pos),
5550 cond = fold_build2_loc (input_location,
5561 b_if = fold_build2_loc (input_location, op == GT_EXPR ? GE_EXPR : LE_EXPR,
5568 b_else = fold_build2_loc (input_location, op, logical_type_node,
5574 tmp = fold_build3_loc (input_location, COND_EXPR, logical_type_node,
5582 build_empty_stmt (input_location));
5596 build_empty_stmt (input_location));
5612 build_empty_stmt (input_location));
5647 tmp = fold_build2_loc (input_location, PLUS_EXPR, TREE_TYPE (pos),
5660 b_if = fold_build2_loc (input_location, op == GT_EXPR ? GE_EXPR : LE_EXPR,
5667 b_else = fold_build2_loc (input_location, op, logical_type_node,
5673 tmp = fold_build3_loc (input_location, COND_EXPR, logical_type_node,
5680 build_empty_stmt (input_location));
5694 build_empty_stmt (input_location));
5860 tmp = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
5890 tmp = fold_build2_loc (input_location, PLUS_EXPR,
5911 tmp = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
5914 tmp = build3_v (COND_EXPR, tmp, found, build_empty_stmt (input_location));
5924 build_empty_stmt (input_location));
5965 build_empty_stmt (input_location));
6149 tmp = fold_build1_loc (input_location, NEGATE_EXPR, TREE_TYPE (tmp), tmp);
6151 huge_cst = fold_build1_loc (input_location, NEGATE_EXPR,
6156 tmp = fold_build2_loc (input_location, MINUS_EXPR, TREE_TYPE (tmp),
6184 nonempty = fold_build2_loc (input_location, GT_EXPR,
6224 nonempty = fold_build2_loc (input_location, LE_EXPR, logical_type_node,
6285 tmp = fold_build2_loc (input_location, op == GT_EXPR ? GE_EXPR : LE_EXPR,
6299 build_empty_stmt (input_location));
6306 tmp = fold_build2_loc (input_location,
6320 tmp = fold_build2_loc (input_location, op, logical_type_node,
6324 build_empty_stmt (input_location));
6328 tmp = fold_build2_loc (input_location,
6350 build_empty_stmt (input_location));
6358 tmp = fold_build3_loc (input_location, COND_EXPR, type, nonempty,
6388 tmp = fold_build2_loc (input_location, op, logical_type_node,
6392 build_empty_stmt (input_location));
6397 tmp = fold_build2_loc (input_location,
6412 build_empty_stmt (input_location));
6424 tmp = fold_build3_loc (input_location, COND_EXPR, type, nonempty,
6427 tmp = build3_v (COND_EXPR, fast, build_empty_stmt (input_location),
6433 tmp = fold_build3_loc (input_location, COND_EXPR, type, nonempty, limit,
6454 else_stmt = build_empty_stmt (input_location);
6486 tree below = fold_build2_loc (input_location, LT_EXPR,
6490 tree above = fold_build2_loc (input_location, GE_EXPR,
6492 tree scond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
6501 tmp = fold_build2_loc (input_location, LSHIFT_EXPR, type,
6503 tmp = fold_build2_loc (input_location, BIT_AND_EXPR, type, args[0], tmp);
6504 tmp = fold_build2_loc (input_location, NE_EXPR, logical_type_node, tmp,
6532 se->expr = fold_build2_loc (input_location, op, logical_type_node,
6544 se->expr = fold_build2_loc (input_location, op, TREE_TYPE (args[0]),
6555 se->expr = fold_build1_loc (input_location, BIT_NOT_EXPR,
6574 tree below = fold_build2_loc (input_location, LT_EXPR,
6578 tree above = fold_build2_loc (input_location, GE_EXPR,
6580 tree scond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
6597 tmp = fold_build2_loc (input_location, LSHIFT_EXPR, type,
6604 tmp = fold_build1_loc (input_location, BIT_NOT_EXPR, type, tmp);
6606 se->expr = fold_build2_loc (input_location, op, type, args[0], tmp);
6630 tree below = fold_build2_loc (input_location, LT_EXPR,
6633 tree above = fold_build2_loc (input_location, GT_EXPR,
6635 tree scond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
6640 below = fold_build2_loc (input_location, LT_EXPR,
6643 above = fold_build2_loc (input_location, GT_EXPR,
6645 scond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
6650 above = fold_build2_loc (input_location, PLUS_EXPR,
6652 scond = fold_build2_loc (input_location, GT_EXPR,
6665 mask = fold_build2_loc (input_location, LSHIFT_EXPR, type, mask, args[2]);
6666 cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node, args[2],
6668 mask = fold_build3_loc (input_location, COND_EXPR, type, cond,
6670 mask = fold_build1_loc (input_location, BIT_NOT_EXPR, type, mask);
6672 tmp = fold_build2_loc (input_location, RSHIFT_EXPR, type, args[0], args[1]);
6674 se->expr = fold_build2_loc (input_location, BIT_AND_EXPR, type, tmp, mask);
6695 se->expr = fold_build2_loc (input_location,
6706 tree nonneg = fold_build2_loc (input_location, GE_EXPR,
6709 bigshift = fold_build3_loc (input_location, COND_EXPR, type, nonneg,
6722 tree below = fold_build2_loc (input_location, LT_EXPR,
6725 tree above = fold_build2_loc (input_location, GT_EXPR,
6727 tree scond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
6744 cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node,
6747 se->expr = fold_build3_loc (input_location, COND_EXPR, type, cond,
6776 width = fold_build1_loc (input_location, ABS_EXPR, TREE_TYPE (args[1]),
6780 lshift = fold_build2_loc (input_location, LSHIFT_EXPR, type, args[0], width);
6787 rshift = fold_convert (type, fold_build2_loc (input_location, RSHIFT_EXPR,
6790 tmp = fold_build2_loc (input_location, GE_EXPR, logical_type_node, args[1],
6792 tmp = fold_build3_loc (input_location, COND_EXPR, type, tmp, lshift, rshift);
6802 tree outside = fold_build2_loc (input_location, GT_EXPR,
6812 cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node, width,
6814 se->expr = fold_build3_loc (input_location, COND_EXPR, type, cond,
6863 tree below = fold_build2_loc (input_location, LE_EXPR,
6866 tree above = fold_build2_loc (input_location, GT_EXPR,
6868 tree scond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
6874 width = fold_build1_loc (input_location, ABS_EXPR,
6876 scond = fold_build2_loc (input_location, GT_EXPR,
6901 se->expr = build_call_expr_loc (input_location,
6919 width = fold_build1_loc (input_location, ABS_EXPR,
6921 tree outside = fold_build2_loc (input_location, GT_EXPR,
6931 lrot = fold_build2_loc (input_location, LROTATE_EXPR, type, args[0], args[1]);
6934 tmp = fold_build1_loc (input_location, NEGATE_EXPR, TREE_TYPE (args[1]),
6936 rrot = fold_build2_loc (input_location,RROTATE_EXPR, type, args[0], tmp);
6939 tmp = fold_build2_loc (input_location, GT_EXPR, logical_type_node, args[1],
6941 rrot = fold_build3_loc (input_location, COND_EXPR, type, tmp, lrot, rrot);
6944 tmp = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, args[1],
6946 se->expr = fold_build3_loc (input_location, COND_EXPR, type, tmp, args[0],
7013 build_call_expr_loc (input_location, func,
7015 leadz = fold_build2_loc (input_location, MINUS_EXPR, result_type,
7033 ullmax = fold_build1_loc (input_location, BIT_NOT_EXPR,
7038 cond = fold_build2_loc (input_location, LSHIFT_EXPR, arg_type,
7040 cond = fold_build2_loc (input_location, BIT_AND_EXPR, arg_type,
7042 cond = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
7045 tmp1 = fold_build2_loc (input_location, RSHIFT_EXPR, arg_type,
7050 build_call_expr_loc (input_location, btmp, 1, tmp1));
7055 build_call_expr_loc (input_location, btmp, 1, tmp2));
7056 tmp2 = fold_build2_loc (input_location, PLUS_EXPR, result_type,
7059 leadz = fold_build3_loc (input_location, COND_EXPR, result_type,
7066 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
7068 se->expr = fold_build3_loc (input_location, COND_EXPR, result_type, cond,
7127 trailz = fold_convert (result_type, build_call_expr_loc (input_location,
7145 ullmax = fold_build1_loc (input_location, BIT_NOT_EXPR,
7149 cond = fold_build2_loc (input_location, BIT_AND_EXPR, arg_type, arg,
7151 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, cond,
7154 tmp1 = fold_build2_loc (input_location, RSHIFT_EXPR, arg_type,
7159 build_call_expr_loc (input_location, btmp, 1, tmp1));
7160 tmp1 = fold_build2_loc (input_location, PLUS_EXPR, result_type,
7166 build_call_expr_loc (input_location, btmp, 1, tmp2));
7168 trailz = fold_build3_loc (input_location, COND_EXPR, result_type,
7175 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
7177 se->expr = fold_build3_loc (input_location, COND_EXPR, result_type, cond,
7241 call1 = build_call_expr_loc (input_location, func, 1,
7245 arg2 = fold_build2_loc (input_location, RSHIFT_EXPR, utype, arg,
7247 call2 = build_call_expr_loc (input_location, func, 1,
7253 se->expr = fold_build2_loc (input_location, BIT_XOR_EXPR,
7256 se->expr = fold_build2_loc (input_location, PLUS_EXPR,
7270 build_call_expr_loc (input_location, func, 1, arg));
7413 se->expr = build_call_expr_loc (input_location,
7450 se->expr = build_call_array_loc (input_location,
7468 args[1] = fold_build1_loc (input_location, NOP_EXPR, pchartype, args[1]);
7471 se->expr = build_fold_indirect_ref_loc (input_location,
7485 se->expr = build_call_expr_loc (input_location,
7502 se->expr = fold_build2_loc (input_location, EQ_EXPR,
7548 se->expr = fold_build3_loc (input_location, COND_EXPR, type, mask, tsource,
7567 args[0] = fold_build2_loc (input_location, BIT_AND_EXPR, type, args[0], mask);
7568 args[1] = fold_build2_loc (input_location, BIT_AND_EXPR, type, args[1],
7569 fold_build1_loc (input_location, BIT_NOT_EXPR,
7571 se->expr = fold_build2_loc (input_location, BIT_IOR_EXPR, type,
7594 allones = fold_build1_loc (input_location, BIT_NOT_EXPR, utype,
7600 res = fold_build2_loc (input_location, MINUS_EXPR, TREE_TYPE (arg),
7602 res = fold_build2_loc (input_location, LSHIFT_EXPR, utype, allones,
7607 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, arg,
7609 res = fold_build3_loc (input_location, COND_EXPR, utype, cond,
7615 res = fold_build2_loc (input_location, LSHIFT_EXPR, utype, allones,
7617 res = fold_build1_loc (input_location, BIT_NOT_EXPR, utype, res);
7621 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
7623 res = fold_build3_loc (input_location, COND_EXPR, utype,
7644 cond = build_call_expr_loc (input_location,
7649 res = build_call_expr_loc (input_location, frexp, 2,
7654 se->expr = fold_build3_loc (input_location, COND_EXPR, type,
7675 tmp = build_call_expr_loc (input_location, copysign, 2, huge_val,
7677 se->expr = build_call_expr_loc (input_location, nextafter, 2,
7728 tmp = build_call_expr_loc (input_location, frexp, 2, arg,
7732 tmp = fold_build2_loc (input_location, MINUS_EXPR, integer_type_node, e,
7734 gfc_add_modify (&block, e, fold_build2_loc (input_location, MAX_EXPR,
7737 tmp = build_call_expr_loc (input_location, scalbn, 2,
7742 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, arg,
7748 cond = build_call_expr_loc (input_location,
7798 build_call_expr_loc (input_location, fabs, 1, arg));
7802 tmp = build_call_expr_loc (input_location, frexp, 2, arg,
7806 tmp = fold_build2_loc (input_location, MINUS_EXPR, integer_type_node,
7808 tmp = build_call_expr_loc (input_location, scalbn, 2, x, tmp);
7813 cond = fold_build2_loc (input_location, NE_EXPR, logical_type_node, x,
7815 tmp = build3_v (COND_EXPR, cond, stmt, build_empty_stmt (input_location));
7818 cond = build_call_expr_loc (input_location,
7839 se->expr = build_call_expr_loc (input_location, scalbn, 2,
7861 tmp = build_call_expr_loc (input_location, frexp, 2,
7864 res = build_call_expr_loc (input_location, scalbn, 2, tmp,
7869 cond = build_call_expr_loc (input_location,
7874 se->expr = fold_build3_loc (input_location, COND_EXPR, type, cond,
7946 cond = fold_build2_loc (input_location, EQ_EXPR,
7984 tree tmp = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
8002 cond = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
8008 tmp = fold_build2_loc (input_location, MODIFY_EXPR,
8012 tmp = fold_build2_loc (input_location, MODIFY_EXPR,
8043 return fold_build2_loc (input_location, MULT_EXPR, gfc_array_index_type,
8081 tmp = build_fold_indirect_ref_loc (input_location, tmp);
8086 tmp = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
8123 byte_size = TREE_TYPE (build_fold_indirect_ref_loc (input_location,
8160 cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node,
8163 tmp = fold_build3_loc (input_location, COND_EXPR, void_type_node,
8164 cond, tmp, build_empty_stmt (input_location));
8170 tmp = fold_build2_loc (input_location, MULT_EXPR,
8174 tmp = fold_build2_loc (input_location, PLUS_EXPR,
8177 gfc_add_modify_loc (input_location, &body, loop_var, tmp);
8181 tmp = fold_build1_loc (input_location, LOOP_EXPR, void_type_node,
8198 tmp = fold_build2_loc (input_location, MULT_EXPR,
8234 type = TREE_TYPE (build_fold_indirect_ref_loc (input_location,
8262 se->expr = fold_build2_loc (input_location, MULT_EXPR, result_type, tmp,
8281 se->expr = fold_build2_loc (input_location, op,
8303 tmp = build_call_expr_loc (input_location,
8382 tmp = build_fold_indirect_ref_loc (input_location, argse.expr);
8416 source_type = TREE_TYPE (build_fold_indirect_ref_loc (input_location,
8439 source = build_call_expr_loc (input_location,
8452 tmp = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
8455 build_empty_stmt (input_location));
8479 tmp = fold_build2_loc (input_location, MINUS_EXPR,
8482 tmp = fold_build2_loc (input_location, PLUS_EXPR,
8485 tmp = fold_build2_loc (input_location, MULT_EXPR,
8507 mold_type = TREE_TYPE (build_fold_indirect_ref_loc (input_location,
8556 build_fold_indirect_ref_loc (input_location,
8570 tmp = fold_build2_loc (input_location, MULT_EXPR, gfc_array_index_type,
8577 fold_build2_loc (input_location, CEIL_DIV_EXPR,
8588 tmp = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
8590 tmp = fold_build2_loc (input_location, PLUS_EXPR, gfc_array_index_type,
8592 tmp = fold_build2_loc (input_location, MIN_EXPR, gfc_array_index_type,
8596 fold_build2_loc (input_location, MULT_EXPR,
8599 upper = fold_build2_loc (input_location, PLUS_EXPR, gfc_array_index_type,
8601 upper = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
8606 upper = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
8624 = build_call_expr_loc (input_location,
8628 fold_build2_loc (input_location,
8640 se->string_length = fold_build2_loc (input_location, TRUNC_DIV_EXPR,
8649 extent = fold_build2_loc (input_location, MIN_EXPR, gfc_array_index_type,
8651 extent = fold_build2_loc (input_location, MAX_EXPR, gfc_array_index_type,
8675 tmp = build_call_expr_loc (input_location,
8684 tmp = fold_build2_loc (input_location, LE_EXPR, logical_type_node,
8691 tmp = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
8693 tmp = build3_v (COND_EXPR, tmp, free, build_empty_stmt (input_location));
8699 se->string_length = fold_build2_loc (input_location, TRUNC_DIV_EXPR,
8724 tmp = build_call_expr_loc (input_location,
8761 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
8766 return build_call_expr_loc (input_location, gfor_fndecl_caf_is_present,
8850 tmp = fold_build2_loc (input_location, NE_EXPR, logical_type_node, tmp,
8903 arg1se.expr = build_fold_indirect_ref_loc (input_location,
8922 tmp = fold_build2_loc (input_location, NE_EXPR, logical_type_node, tmp2,
8940 arg1se.expr = build_fold_indirect_ref_loc (input_location,
8949 arg2se.expr = build_fold_indirect_ref_loc (input_location,
8960 tmp = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
8962 tmp2 = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
8964 se->expr = fold_build2_loc (input_location, TRUTH_AND_EXPR,
8976 tmp = fold_build2_loc (input_location, MINUS_EXPR,
8984 nonzero_arraylen = fold_build2_loc (input_location, NE_EXPR,
9008 se->expr = build_call_expr_loc (input_location,
9013 se->expr = fold_build2_loc (input_location, TRUTH_AND_EXPR,
9023 tmp = fold_build2_loc (input_location, NE_EXPR,
9026 se->expr = fold_build2_loc (input_location, TRUTH_AND_EXPR,
9087 conda = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
9095 condb = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
9101 tmp = fold_build2_loc (input_location, EQ_EXPR,
9106 tmp = fold_build2_loc (input_location, TRUTH_ANDIF_EXPR,
9110 tmp = fold_build2_loc (input_location, TRUTH_ANDIF_EXPR,
9125 se->expr = build_call_expr_loc (input_location,
9146 se->expr = build_call_expr_loc (input_location,
9191 se->expr = build_call_expr_loc_vec (input_location,
9231 tmp = build_call_array_loc (input_location,
9237 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
9240 tmp = build3_v (COND_EXPR, cond, tmp, build_empty_stmt (input_location));
9271 cond = fold_build2_loc (input_location, LT_EXPR, logical_type_node, ncopies,
9281 cond = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, slen,
9283 tmp = fold_build3_loc (input_location, COND_EXPR, ncopies_type, cond,
9292 max = fold_build2_loc (input_location, TRUNC_DIV_EXPR, sizetype,
9298 cond = fold_build2_loc (input_location, GT_EXPR, logical_type_node,
9301 tmp = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, slen,
9303 cond = fold_build3_loc (input_location, COND_EXPR, logical_type_node, tmp,
9309 dlen = fold_build2_loc (input_location, MULT_EXPR, gfc_charlen_type_node,
9327 cond = fold_build2_loc (input_location, GE_EXPR, logical_type_node, count,
9331 tmp = fold_build3_loc (input_location, COND_EXPR, void_type_node, cond, tmp,
9332 build_empty_stmt (input_location));
9336 tmp = fold_build2_loc (input_location, MULT_EXPR, sizetype, slen,
9338 tmp = fold_build2_loc (input_location, MULT_EXPR, sizetype, tmp,
9340 tmp = fold_build_pointer_plus_loc (input_location,
9342 tmp = build_call_expr_loc (input_location,
9345 fold_build2_loc (input_location, MULT_EXPR,
9350 tmp = fold_build2_loc (input_location, PLUS_EXPR, sizetype,
9383 tmp = build_call_expr_loc (input_location,
9416 tmp = build_call_expr_loc (input_location, gfor_fndecl_kill, 2, pid, sig);
9459 tmp = build_call_expr_loc (input_location, gfor_fndecl_kill_sub, 3, pid, sig,
9552 se->expr = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
9568 eq_expr = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
9571 not_null_expr = fold_build2_loc (input_location, NE_EXPR,
9577 se->expr = fold_build2_loc (input_location, TRUTH_AND_EXPR,
9620 fptrse.expr = build_fold_indirect_ref_loc (input_location,
9622 se.expr = fold_build2_loc (input_location, MODIFY_EXPR,
9674 dim = fold_build2_loc (input_location, MINUS_EXPR, gfc_array_index_type,
9688 fold_build2_loc (input_location, PLUS_EXPR,
9692 fold_build2_loc (input_location, MULT_EXPR,
9704 fold_build1_loc (input_location, NEGATE_EXPR,
9727 tmp = build_call_expr_loc (input_location, gfor_fndecl_ieee_procedure_entry,
9740 tmp = build_call_expr_loc (input_location, gfor_fndecl_ieee_procedure_exit,
9785 se->expr = build_call_expr_loc_array (input_location,
9805 isnormal = build_call_expr_loc (input_location,
9808 iszero = fold_build2_loc (input_location, EQ_EXPR, logical_type_node, arg,
9811 se->expr = fold_build2_loc (input_location, TRUTH_OR_EXPR,
9829 isnan = build_call_expr_loc (input_location,
9834 signbit = build_call_expr_loc (input_location,
9837 signbit = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
9840 se->expr = fold_build2_loc (input_location, TRUTH_AND_EXPR,
9842 fold_build1_loc (input_location, TRUTH_NOT_EXPR,
9866 call = build_call_expr_loc (input_location, decl, 1, arg);
9899 call = build_call_expr_loc_array (input_location, decl, 2, args);
9926 call = build_call_expr_loc_array (input_location, decl, 2, args);
9958 args[1] = fold_build2_loc (input_location, MIN_EXPR, type, args[1],
9960 args[1] = fold_build2_loc (input_location, MAX_EXPR, type, args[1],
9961 fold_build1_loc (input_location, NEGATE_EXPR,
9968 call = build_call_expr_loc_array (input_location, decl, 2, args);
9984 sign = build_call_expr_loc (input_location,
9987 sign = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
9991 sign = fold_build3_loc (input_location, COND_EXPR, integer_type_node,
9993 fold_build1_loc (input_location, NEGATE_EXPR,
10002 se->expr = build_call_expr_loc_array (input_location, decl, 2, args);
10022 c = build_call_expr_loc (input_location,
10035 t1 = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
10043 t2 = fold_build1_loc (input_location, VIEW_CONVERT_EXPR,
10045 t2 = fold_build2_loc (input_location, RSHIFT_EXPR, TREE_TYPE (t2), t2,
10048 t2 = fold_build2_loc (input_location, BIT_AND_EXPR, integer_type_node,
10050 t2 = fold_build2_loc (input_location, EQ_EXPR, logical_type_node,
10052 t1 = fold_build2_loc (input_location, TRUTH_AND_EXPR,
10054 t3 = fold_build2_loc (input_location, GE_EXPR, logical_type_node,
10057 t4 = build_call_expr_loc (input_location,
10060 t4 = fold_build2_loc (input_location, NE_EXPR, logical_type_node,
10062 t3 = fold_build2_loc (input_location, TRUTH_AND_EXPR,
10070 t4 = fold_build2_loc (input_location, MINUS_EXPR, TREE_TYPE (c),
10072 t3 = fold_build3_loc (input_location, COND_EXPR, TREE_TYPE (c),
10074 t1 = fold_build3_loc (input_location, COND_EXPR, TREE_TYPE (c), t1,
10130 arg = fold_build3_loc (input_location, COMPONENT_REF, TREE_TYPE (field),
10209 tmp = fold_build2_loc (input_location, SWITCH_EXPR, NULL_TREE, arg, tmp);
10272 res = build_call_expr_loc (input_location,
11420 build_empty_stmt (input_location));
11528 fndecl = build_call_expr_loc (input_location, fndecl, 5, array,
11531 fndecl = build_call_expr_loc (input_location, fndecl, 6, array,
11566 fndecl = build_call_expr_loc (input_location, fndecl, 8, array, opr,
11682 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
11702 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_atomic_def, 7,
11709 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_atomic_op, 9,
11763 tmp = build_call_expr_loc (input_location, tmp, 3, atom,
11769 tmp = build_call_expr_loc (input_location, tmp, 3, atom,
11838 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
11858 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_atomic_ref, 7,
11878 tmp = build_call_expr_loc (input_location, tmp, 2, atom,
11960 caf_decl = build_fold_indirect_ref_loc (input_location, caf_decl);
11987 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_atomic_cas, 9,
12006 tmp = build_call_expr_loc (input_location, tmp, 6, atom,
12112 tmp = fold_build2_loc (input_location, MINUS_EXPR,
12114 tmp = fold_build2_loc (input_location, MULT_EXPR,
12116 index = fold_build2_loc (input_location, PLUS_EXPR,
12122 extent = fold_build2_loc (input_location, MULT_EXPR,
12141 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_event_query, 5,
12230 below = fold_build2_loc (input_location, LT_EXPR,
12233 above = fold_build2_loc (input_location, GT_EXPR,
12236 ccond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
12242 below = fold_build2_loc (input_location, LT_EXPR,
12245 above = fold_build2_loc (input_location, GT_EXPR,
12248 ccond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
12254 below = fold_build2_loc (input_location, LT_EXPR,
12257 above = fold_build2_loc (input_location, GT_EXPR,
12260 ccond = fold_build2_loc (input_location, TRUTH_ORIF_EXPR,
12270 above = fold_build2_loc (input_location, PLUS_EXPR,
12272 ccond = fold_build2_loc (input_location, GT_EXPR,
12278 above = fold_build2_loc (input_location, PLUS_EXPR,
12280 ccond = fold_build2_loc (input_location, GT_EXPR,
12295 above = fold_build2_loc (input_location, GE_EXPR, logical_type_node,
12298 mask2 = fold_build2_loc (input_location, LSHIFT_EXPR, type,
12300 mask2 = fold_build2_loc (input_location, MINUS_EXPR, type,
12302 lenmask = fold_build3_loc (input_location, COND_EXPR, type,
12309 newbits = fold_build2_loc (input_location, RSHIFT_EXPR, utype,
12311 newbits = fold_build2_loc (input_location, BIT_AND_EXPR, type,
12313 newbits = fold_build2_loc (input_location, LSHIFT_EXPR, type,
12317 oldbits = fold_build2_loc (input_location, LSHIFT_EXPR, type,
12319 oldbits = fold_build1_loc (input_location, BIT_NOT_EXPR, type, oldbits);
12320 oldbits = fold_build2_loc (input_location, BIT_AND_EXPR, type, oldbits, to);
12323 se->expr = fold_build2_loc (input_location, BIT_IOR_EXPR, type,
12327 se->expr = fold_build2_loc (input_location, MODIFY_EXPR,
12385 gfc_add_modify_loc (input_location, &block, to_se.expr,
12389 gfc_add_modify_loc (input_location, &block, from_se.expr,
12421 gfc_add_modify_loc (input_location, &block, to_se.expr,
12428 gfc_add_modify_loc (input_location, &block, from_se.expr,
12434 gfc_add_modify_loc (input_location, &block, from_se.expr,
12443 gfc_add_modify_loc (input_location, &block, to_se.expr,
12450 gfc_add_modify_loc (input_location, &block, to_se.string_length,
12454 gfc_add_modify_loc (input_location, &block, from_se.string_length,
12485 gfc_add_modify_loc (input_location, &block, to_se.expr,
12492 gfc_add_modify_loc (input_location, &block, from_se.expr,
12498 gfc_add_modify_loc (input_location, &block, from_se.expr,
12507 gfc_add_modify_loc (input_location, &block, to_se.expr,
12543 cond = fold_build2_loc (input_location, EQ_EXPR,
12547 tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_sync_all,
12551 tmp = fold_build3_loc (input_location, COND_EXPR, void_type_node, cond,
12552 tmp, build_empty_stmt (input_location));
12573 gfc_add_modify_loc (input_location, &block, to_se.expr, from_se.expr);
12577 gfc_add_modify_loc (input_location, &block, tmp,
12583 gfc_add_modify_loc (input_location, &block, to_se.string_length,
12587 gfc_add_modify_loc (input_location, &block, from_se.string_length,