Lines Matching refs:constructor
234 for (c = gfc_constructor_first (e->value.constructor); in is_constant_array_expr()
263 return array->value.constructor == NULL; in gfc_is_size_zero_array()
276 gfc_constructor *ctor = gfc_constructor_first (e->value.constructor); in init_result_expr()
374 a = gfc_constructor_lookup_expr (matrix_a->value.constructor, offset_a); in compute_dot_product()
375 b = gfc_constructor_lookup_expr (matrix_b->value.constructor, offset_b); in compute_dot_product()
403 a = gfc_constructor_lookup_expr (matrix_a->value.constructor, offset_a); in compute_dot_product()
406 b = gfc_constructor_lookup_expr (matrix_b->value.constructor, offset_b); in compute_dot_product()
438 gfc_constructor_append_expr (&result->value.constructor, in transformational_result()
494 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_transformation_to_scalar()
497 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_transformation_to_scalar()
558 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_transformation_to_array()
561 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_transformation_to_array()
583 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_transformation_to_array()
656 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_transformation_to_array()
1398 gfc_constructor_append_expr (&result->value.constructor, e, in gfc_simplify_bessel_n2()
1410 gfc_constructor_append_expr (&result->value.constructor, e, in gfc_simplify_bessel_n2()
1444 gfc_constructor_append_expr (&result->value.constructor, e, &x->where); in gfc_simplify_bessel_n2()
1471 gfc_constructor_insert_expr (&result->value.constructor, e, &x->where, -2); in gfc_simplify_bessel_n2()
1473 gfc_constructor_append_expr (&result->value.constructor, e, &x->where); in gfc_simplify_bessel_n2()
1496 gfc_constructor_append_expr (&result->value.constructor, e, in gfc_simplify_bessel_n2()
1514 gfc_constructor_insert_expr (&result->value.constructor, e, &x->where, in gfc_simplify_bessel_n2()
1517 gfc_constructor_append_expr (&result->value.constructor, e, &x->where); in gfc_simplify_bessel_n2()
2097 array_ctor = gfc_constructor_first (array->value.constructor); in gfc_simplify_cshift()
2121 shift_ctor = gfc_constructor_first (shift->value.constructor); in gfc_simplify_cshift()
2240 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_cshift()
2548 array_ctor = gfc_constructor_first (array->value.constructor); in gfc_simplify_eoshift()
2568 shift_ctor = gfc_constructor_first (shift->value.constructor); in gfc_simplify_eoshift()
2578 bnd_ctor = gfc_constructor_first (bnd->value.constructor); in gfc_simplify_eoshift()
2698 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_eoshift()
4234 gfc_constructor_append_expr (&e->value.constructor, in simplify_bound()
4369 gfc_constructor_append_expr (&e->value.constructor, in simplify_cobound()
4710 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_matmul()
4814 tsource_ctor = gfc_constructor_first (tsource->value.constructor); in gfc_simplify_merge()
4815 fsource_ctor = gfc_constructor_first (fsource->value.constructor); in gfc_simplify_merge()
4816 mask_ctor = gfc_constructor_first (mask->value.constructor); in gfc_simplify_merge()
4821 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_merge()
4825 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_merge()
5085 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_minmaxloc_to_scalar()
5087 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_minmaxloc_to_scalar()
5148 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_minmaxloc_nodim()
5150 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_minmaxloc_nodim()
5197 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_minmaxloc_nodim()
5223 gfc_constructor_append_expr (&result->value.constructor, in new_array()
5262 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_minmaxloc_to_array()
5265 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_minmaxloc_to_array()
5287 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_minmaxloc_to_array()
5362 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_minmaxloc_to_array()
5476 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_findloc_to_scalar()
5478 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_findloc_to_scalar()
5544 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_findloc_nodim()
5546 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_findloc_nodim()
5594 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_findloc_nodim()
5636 array_ctor = gfc_constructor_first (array->value.constructor); in simplify_findloc_to_array()
5639 mask_ctor = gfc_constructor_first (mask->value.constructor); in simplify_findloc_to_array()
5661 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_findloc_to_array()
5738 result_ctor = gfc_constructor_first (result->value.constructor); in simplify_findloc_to_array()
6274 array_ctor = gfc_constructor_first (array->value.constructor); in gfc_simplify_pack()
6276 ? gfc_constructor_first (vector->value.constructor) in gfc_simplify_pack()
6285 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_pack()
6297 mask_ctor = gfc_constructor_first (mask->value.constructor); in gfc_simplify_pack()
6302 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_pack()
6316 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_pack()
6700 e = gfc_constructor_lookup_expr (shape_exp->value.constructor, rank); in gfc_simplify_reshape()
6753 e = gfc_constructor_lookup_expr (order_exp->value.constructor, i); in gfc_simplify_reshape()
6827 e = gfc_constructor_lookup_expr (source->value.constructor, j); in gfc_simplify_reshape()
6837 e = gfc_constructor_lookup_expr (pad->value.constructor, j); in gfc_simplify_reshape()
6841 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_reshape()
7315 gfc_constructor_append_expr (&result->value.constructor, e, NULL); in gfc_simplify_shape()
7727 gfc_constructor_append_expr (&result->value.constructor, in gfc_simplify_spread()
7757 for (source_ctor = gfc_constructor_first (source->value.constructor); in gfc_simplify_spread()
7761 gfc_constructor_insert_expr (&result->value.constructor, in gfc_simplify_spread()
7983 mold_element = (mold->expr_type == EXPR_ARRAY && mold->value.constructor) in gfc_simplify_transfer()
7984 ? gfc_constructor_first (mold->value.constructor)->expr in gfc_simplify_transfer()
8062 gfc_expr *e = gfc_constructor_lookup_expr (matrix->value.constructor, in gfc_simplify_transpose()
8064 gfc_constructor_insert_expr (&result->value.constructor, in gfc_simplify_transpose()
8126 sub_cons = gfc_constructor_first (sub->value.constructor); in gfc_simplify_image_index()
8301 vector_ctor = gfc_constructor_first (vector->value.constructor); in gfc_simplify_unpack()
8302 mask_ctor = gfc_constructor_first (mask->value.constructor); in gfc_simplify_unpack()
8305 ? gfc_constructor_first (field->value.constructor) in gfc_simplify_unpack()
8328 gfc_constructor_append_expr (&result->value.constructor, e, NULL); in gfc_simplify_unpack()
8601 for (c = gfc_constructor_first (e->value.constructor); in gfc_convert_constant()
8627 t = gfc_constructor_append_expr (&result->value.constructor, in gfc_convert_constant()
8691 for (c = gfc_constructor_first (e->value.constructor); in gfc_convert_char_constant()
8707 gfc_constructor_append_expr (&result->value.constructor, in gfc_convert_char_constant()