Home
last modified time | relevance | path

Searched refs:gfc_rank_cst (Results 1 – 24 of 24) sorted by relevance

/netbsd/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-const.h65 extern GTY(()) tree gfc_rank_cst[GFC_MAX_DIMENSIONS + 1];
67 #define gfc_index_zero_node gfc_rank_cst[0]
68 #define gfc_index_one_node gfc_rank_cst[1]
H A Dtrans-array.c2884 zero = gfc_rank_cst[0]; in set_vector_loop_bounds()
3478 gfc_rank_cst[dim]); in conv_array_index_offset()
4352 gfc_rank_cst[dim]): in evaluate_bound()
4354 gfc_rank_cst[dim]); in evaluate_bound()
8412 gfc_rank_cst[i]); in gfc_conv_array_parameter()
9741 gfc_rank_cst[i], in structure_alloc_comps()
9749 gfc_rank_cst[i], in structure_alloc_comps()
9752 gfc_rank_cst[i], in structure_alloc_comps()
10681 gfc_rank_cst[n], in gfc_alloc_allocatable_for_assignment()
10684 gfc_rank_cst[n], in gfc_alloc_allocatable_for_assignment()
[all …]
H A Dtrans-const.c37 tree gfc_rank_cst[GFC_MAX_DIMENSIONS + 1]; variable
197 gfc_rank_cst[n] = build_int_cst (gfc_array_index_type, n); in gfc_init_constants()
H A Dtrans-intrinsic.c1569 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1571 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1574 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1866 gfc_rank_cst[n]); in gfc_conv_intrinsic_caf_get()
1868 gfc_rank_cst[n]); in gfc_conv_intrinsic_caf_get()
2722 gfc_build_array_ref (subdesc, gfc_rank_cst[corank-1], in trans_image_index()
3184 bound, gfc_rank_cst[arg->expr->rank]); in conv_intrinsic_cobound()
3232 gfc_rank_cst[arg->expr->rank - 1]); in conv_intrinsic_cobound()
8128 idx = gfc_rank_cst[n]; in gfc_conv_intrinsic_sizeof()
8409 idx = gfc_rank_cst[n]; in gfc_conv_intrinsic_transfer()
[all …]
H A Dtrans-expr.c4272 dim = gfc_rank_cst[n]; in gfc_set_interface_mapping_bounds()
5063 gfc_rank_cst[n]); in gfc_conv_subref_array_arg()
5069 gfc_rank_cst[n], in gfc_conv_subref_array_arg()
5073 gfc_rank_cst[n], in gfc_conv_subref_array_arg()
8132 gfc_rank_cst[n]); in gfc_trans_alloc_subarray_assign()
8136 gfc_rank_cst[n]); in gfc_trans_alloc_subarray_assign()
8155 gfc_rank_cst[n]), in gfc_trans_alloc_subarray_assign()
8157 gfc_rank_cst[n])); in gfc_trans_alloc_subarray_assign()
9657 gfc_rank_cst[dim]); in gfc_trans_pointer_assignment()
9659 gfc_rank_cst[dim]); in gfc_trans_pointer_assignment()
[all …]
H A Dtrans-types.c1851 gfc_rank_cst[codimen + dimen - 1])); in gfc_get_array_descriptor_base()
3531 gfc_rank_cst[dim-1]); in gfc_get_caf_vector_type()
3602 gfc_rank_cst[GFC_MAX_DIMENSIONS - 1]); in gfc_get_caf_reference_type()
3611 gfc_rank_cst[GFC_MAX_DIMENSIONS - 1])), in gfc_get_caf_reference_type()
H A Dtrans-stmt.c910 lbound = gfc_conv_descriptor_lbound_get (desc, gfc_rank_cst[i]); in gfc_trans_lock_unlock()
919 ubound = gfc_conv_descriptor_ubound_get (desc, gfc_rank_cst[i]); in gfc_trans_lock_unlock()
1108 lbound = gfc_conv_descriptor_lbound_get (desc, gfc_rank_cst[i]); in gfc_trans_event_post_wait()
1117 ubound = gfc_conv_descriptor_ubound_get (desc, gfc_rank_cst[i]); in gfc_trans_event_post_wait()
1673 dim = gfc_rank_cst[n]; in copy_descriptor()
2019 dim = gfc_rank_cst[n]; in trans_associate_var()
H A Dtrans-openmp.c625 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_default_ctor()
733 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_copy_ctor()
856 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_assign_op()
893 tree rank = gfc_rank_cst[i]; in gfc_omp_clause_assign_op()
1087 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_linear_ctor()
/netbsd/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-const.h65 extern GTY(()) tree gfc_rank_cst[GFC_MAX_DIMENSIONS + 1];
67 #define gfc_index_zero_node gfc_rank_cst[0]
68 #define gfc_index_one_node gfc_rank_cst[1]
H A Dtrans-array.c2884 zero = gfc_rank_cst[0]; in set_vector_loop_bounds()
3478 gfc_rank_cst[dim]); in conv_array_index_offset()
4352 gfc_rank_cst[dim]): in evaluate_bound()
4354 gfc_rank_cst[dim]); in evaluate_bound()
8412 gfc_rank_cst[i]); in gfc_conv_array_parameter()
9741 gfc_rank_cst[i], in structure_alloc_comps()
9749 gfc_rank_cst[i], in structure_alloc_comps()
9752 gfc_rank_cst[i], in structure_alloc_comps()
10681 gfc_rank_cst[n], in gfc_alloc_allocatable_for_assignment()
10684 gfc_rank_cst[n], in gfc_alloc_allocatable_for_assignment()
[all …]
H A Dtrans-array.cc2980 zero = gfc_rank_cst[0]; in set_vector_loop_bounds()
3575 gfc_rank_cst[dim]); in conv_array_index_offset()
4453 gfc_rank_cst[dim]): in evaluate_bound()
4455 gfc_rank_cst[dim]); in evaluate_bound()
8578 gfc_rank_cst[i]); in gfc_conv_array_parameter()
9939 gfc_rank_cst[i], in structure_alloc_comps()
9947 gfc_rank_cst[i], in structure_alloc_comps()
9950 gfc_rank_cst[i], in structure_alloc_comps()
10866 gfc_rank_cst[n], in gfc_alloc_allocatable_for_assignment()
10869 gfc_rank_cst[n], in gfc_alloc_allocatable_for_assignment()
[all …]
H A Dtrans-const.c37 tree gfc_rank_cst[GFC_MAX_DIMENSIONS + 1]; variable
197 gfc_rank_cst[n] = build_int_cst (gfc_array_index_type, n); in gfc_init_constants()
H A Dtrans-const.cc37 tree gfc_rank_cst[GFC_MAX_DIMENSIONS + 1]; variable
197 gfc_rank_cst[n] = build_int_cst (gfc_array_index_type, n); in gfc_init_constants()
H A Dtrans-intrinsic.c1569 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1571 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1574 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1866 gfc_rank_cst[n]); in gfc_conv_intrinsic_caf_get()
1868 gfc_rank_cst[n]); in gfc_conv_intrinsic_caf_get()
2722 gfc_build_array_ref (subdesc, gfc_rank_cst[corank-1], in trans_image_index()
3184 bound, gfc_rank_cst[arg->expr->rank]); in conv_intrinsic_cobound()
3232 gfc_rank_cst[arg->expr->rank - 1]); in conv_intrinsic_cobound()
8128 idx = gfc_rank_cst[n]; in gfc_conv_intrinsic_sizeof()
8409 idx = gfc_rank_cst[n]; in gfc_conv_intrinsic_transfer()
[all …]
H A Dtrans-intrinsic.cc1577 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1579 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1582 gfc_rank_cst[0]); in conv_expr_ref_to_caf_ref()
1874 gfc_rank_cst[n]); in gfc_conv_intrinsic_caf_get()
1876 gfc_rank_cst[n]); in gfc_conv_intrinsic_caf_get()
2730 gfc_build_array_ref (subdesc, gfc_rank_cst[corank-1], in trans_image_index()
3175 bound, gfc_rank_cst[arg->expr->rank]); in conv_intrinsic_cobound()
3223 gfc_rank_cst[arg->expr->rank - 1]); in conv_intrinsic_cobound()
8210 idx = gfc_rank_cst[n]; in gfc_conv_intrinsic_sizeof()
8491 idx = gfc_rank_cst[n]; in gfc_conv_intrinsic_transfer()
[all …]
H A Dtrans-expr.cc4359 dim = gfc_rank_cst[n]; in gfc_set_interface_mapping_bounds()
5150 gfc_rank_cst[n]); in gfc_conv_subref_array_arg()
5156 gfc_rank_cst[n], in gfc_conv_subref_array_arg()
5160 gfc_rank_cst[n], in gfc_conv_subref_array_arg()
8668 gfc_rank_cst[n]); in gfc_trans_alloc_subarray_assign()
8672 gfc_rank_cst[n]); in gfc_trans_alloc_subarray_assign()
8691 gfc_rank_cst[n]), in gfc_trans_alloc_subarray_assign()
8693 gfc_rank_cst[n])); in gfc_trans_alloc_subarray_assign()
10207 gfc_rank_cst[dim]); in gfc_trans_pointer_assignment()
10209 gfc_rank_cst[dim]); in gfc_trans_pointer_assignment()
[all …]
H A Dtrans-expr.c4272 dim = gfc_rank_cst[n]; in gfc_set_interface_mapping_bounds()
5063 gfc_rank_cst[n]); in gfc_conv_subref_array_arg()
5069 gfc_rank_cst[n], in gfc_conv_subref_array_arg()
5073 gfc_rank_cst[n], in gfc_conv_subref_array_arg()
8132 gfc_rank_cst[n]); in gfc_trans_alloc_subarray_assign()
8136 gfc_rank_cst[n]); in gfc_trans_alloc_subarray_assign()
8155 gfc_rank_cst[n]), in gfc_trans_alloc_subarray_assign()
8157 gfc_rank_cst[n])); in gfc_trans_alloc_subarray_assign()
9657 gfc_rank_cst[dim]); in gfc_trans_pointer_assignment()
9659 gfc_rank_cst[dim]); in gfc_trans_pointer_assignment()
[all …]
H A Dtrans-types.cc1903 gfc_rank_cst[codimen + dimen - 1])); in gfc_get_array_descriptor_base()
3639 gfc_rank_cst[dim-1]); in gfc_get_caf_vector_type()
3710 gfc_rank_cst[GFC_MAX_DIMENSIONS - 1]); in gfc_get_caf_reference_type()
3719 gfc_rank_cst[GFC_MAX_DIMENSIONS - 1])), in gfc_get_caf_reference_type()
3837 range = gfc_rank_cst[dimen - 1]; in gfc_get_cfi_type()
H A Dtrans-types.c1851 gfc_rank_cst[codimen + dimen - 1])); in gfc_get_array_descriptor_base()
3531 gfc_rank_cst[dim-1]); in gfc_get_caf_vector_type()
3602 gfc_rank_cst[GFC_MAX_DIMENSIONS - 1]); in gfc_get_caf_reference_type()
3611 gfc_rank_cst[GFC_MAX_DIMENSIONS - 1])), in gfc_get_caf_reference_type()
H A Dtrans-stmt.c910 lbound = gfc_conv_descriptor_lbound_get (desc, gfc_rank_cst[i]); in gfc_trans_lock_unlock()
919 ubound = gfc_conv_descriptor_ubound_get (desc, gfc_rank_cst[i]); in gfc_trans_lock_unlock()
1108 lbound = gfc_conv_descriptor_lbound_get (desc, gfc_rank_cst[i]); in gfc_trans_event_post_wait()
1117 ubound = gfc_conv_descriptor_ubound_get (desc, gfc_rank_cst[i]); in gfc_trans_event_post_wait()
1673 dim = gfc_rank_cst[n]; in copy_descriptor()
2019 dim = gfc_rank_cst[n]; in trans_associate_var()
H A Dtrans-stmt.cc944 lbound = gfc_conv_descriptor_lbound_get (desc, gfc_rank_cst[i]); in gfc_trans_lock_unlock()
953 ubound = gfc_conv_descriptor_ubound_get (desc, gfc_rank_cst[i]); in gfc_trans_lock_unlock()
1142 lbound = gfc_conv_descriptor_lbound_get (desc, gfc_rank_cst[i]); in gfc_trans_event_post_wait()
1151 ubound = gfc_conv_descriptor_ubound_get (desc, gfc_rank_cst[i]); in gfc_trans_event_post_wait()
1709 dim = gfc_rank_cst[n]; in copy_descriptor()
2056 dim = gfc_rank_cst[n]; in trans_associate_var()
H A Dtrans-openmp.c625 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_default_ctor()
733 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_copy_ctor()
856 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_assign_op()
893 tree rank = gfc_rank_cst[i]; in gfc_omp_clause_assign_op()
1087 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_linear_ctor()
H A Dtrans-openmp.cc727 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_default_ctor()
918 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_copy_ctor()
1041 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_assign_op()
1078 tree rank = gfc_rank_cst[i]; in gfc_omp_clause_assign_op()
1272 tree rank = gfc_rank_cst[GFC_TYPE_ARRAY_RANK (type) - 1]; in gfc_omp_clause_linear_ctor()
H A Dtrans-decl.cc7149 tree tmp2 = gfc_get_cfi_dim_sm (cfi, gfc_rank_cst[0]); in gfc_conv_cfi_to_gfc()
7174 gfc_conv_descriptor_lbound_set (&block2, gfc_desc, gfc_rank_cst[i], in gfc_conv_cfi_to_gfc()