/netbsd/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | trans-const.h | 65 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 D | trans-array.c | 2884 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 D | trans-const.c | 37 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 D | trans-intrinsic.c | 1569 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 D | trans-expr.c | 4272 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 D | trans-types.c | 1851 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 D | trans-stmt.c | 910 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 D | trans-openmp.c | 625 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 D | trans-const.h | 65 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 D | trans-array.c | 2884 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 D | trans-array.cc | 2980 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 D | trans-const.c | 37 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 D | trans-const.cc | 37 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 D | trans-intrinsic.c | 1569 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 D | trans-intrinsic.cc | 1577 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 D | trans-expr.cc | 4359 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 D | trans-expr.c | 4272 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 D | trans-types.cc | 1903 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 D | trans-types.c | 1851 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 D | trans-stmt.c | 910 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 D | trans-stmt.cc | 944 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 D | trans-openmp.c | 625 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 D | trans-openmp.cc | 727 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 D | trans-decl.cc | 7149 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()
|