Searched refs:arr_ast (Results 1 – 7 of 7) sorted by relevance
/dports/math/libpgmath/flang-d07daf3/tools/flang1/flang1exe/ |
H A D | rest.c | 3167 *retval = A_LOPG(arr_ast); in copy_arg_to_seq_tmp() 3242 shape = A_SHAPEG(arr_ast); in copy_arg_to_seq_tmp() 3306 shape = A_SHAPEG(arr_ast); in copy_arg_to_seq_tmp() 3745 if (!A_SHAPEG(arr_ast)) in continuous_section() 3747 asd = A_ASDG(arr_ast); in continuous_section() 3757 sptr = sym_of_ast(arr_ast); in continuous_section() 3767 if (!is_whole_dim(arr_ast, dim)) in continuous_section() 3783 if (!A_SHAPEG(arr_ast)) in stride_1_section() 3785 if (A_TYPEG(arr_ast) == A_SUBSCR) { in stride_1_section() 3786 asd = A_ASDG(arr_ast); in stride_1_section() [all …]
|
H A D | symutl.c | 1201 sptr = mk_shape_sptr(A_SHAPEG(arr_ast), subscr, dty); in get_temp_remapping() 1489 arr_sptr = find_array(arr_ast, &ssast); in chk_assign_sptr() 1764 arr_sptr = find_array(arr_ast, &ssast); in handle_non_cnst_dim() 1817 arr_sptr = find_array(arr_ast, &ssast); in chk_reduc_sptr() 1951 if (A_TYPEG(arr_ast) != A_SUBSCR && A_SHAPEG(arr_ast) == 0) { /*scalar */ in mk_spread_sptr() 1977 switch (A_TYPEG(arr_ast)) { in mk_spread_sptr() 1979 asd = A_ASDG(arr_ast); in mk_spread_sptr() 1992 arr_sptr = find_array(arr_ast, &ssast); in mk_spread_sptr() 2009 dtype = A_DTYPEG(arr_ast); in mk_spread_sptr() 2012 shape = A_SHAPEG(arr_ast); in mk_spread_sptr() [all …]
|
H A D | symutl.h | 78 LOGICAL contiguous_section(int arr_ast); /* func.c */
|
H A D | transfrm.c | 1535 shape = A_SHAPEG(arr_ast); in normalize_forall_array() 1537 if (A_TYPEG(arr_ast) == A_ID || A_TYPEG(arr_ast) == A_MEM) { in normalize_forall_array() 1540 } else if (A_TYPEG(arr_ast) == A_SUBSCR) { in normalize_forall_array() 1541 asd = A_ASDG(arr_ast); in normalize_forall_array() 1545 interr("normalize_forall_array:bad ast type", arr_ast, 3); in normalize_forall_array() 1555 vectmem = vector_member(arr_ast); in normalize_forall_array() 1584 lwb = check_member(arr_ast, SHD_LWB(shape, i)); in normalize_forall_array() 1585 stride = check_member(arr_ast, SHD_STRIDE(shape, i)); in normalize_forall_array() 1605 ast = search_arr(arr_ast); in normalize_forall_array() 1621 if (A_TYPEG(arr_ast) == A_SUBSCR) { in normalize_forall_array() [all …]
|
H A D | ast.c | 3271 arr_ast); in is_whole_dim() 3272 asd = A_ASDG(arr_ast); in is_whole_dim() 3321 is_whole_array(int arr_ast) in is_whole_array() argument 3326 arr_ast, 2); in is_whole_array() 3328 lop = A_LOPG(arr_ast); in is_whole_array() 3330 lop = arr_ast; in is_whole_array() 3345 shape = A_SHAPEG(arr_ast); in is_whole_array() 3406 simply_contiguous(int arr_ast) in simply_contiguous() argument 3410 switch (A_TYPEG(arr_ast)) { in simply_contiguous() 3412 sptr = sym_of_ast(arr_ast); in simply_contiguous() [all …]
|
H A D | func.c | 1164 contiguous_section(int arr_ast) in contiguous_section() argument 1174 if (A_TYPEG(arr_ast) != A_ID && A_TYPEG(arr_ast) != A_SUBSCR && in contiguous_section() 1175 A_TYPEG(arr_ast) != A_MEM) in contiguous_section() 1226 contiguous_section_array(int arr_ast) in contiguous_section_array() argument 1232 int ast1 = A_TYPEG(arr_ast) == A_MEM ? A_MEMG(arr_ast) : arr_ast; in contiguous_section_array() 1247 if (!is_whole_dim(arr_ast, dim)) in contiguous_section_array() 1251 if (!is_whole_dim(arr_ast, dim)) in contiguous_section_array() 4230 add_arg(check_member(arr_ast, mk_id(DESCRG(arr_sptr)))); in add_reduce_descriptor() 4256 add_arg(check_member(arr_ast, mk_id(DESCRG(arr_sptr)))); in add_spread_descriptor() 7138 mmul_array(int arr_ast) in mmul_array() argument [all …]
|
/dports/math/libpgmath/flang-d07daf3/tools/flang1/utils/ast/ |
H A D | ast.in.h | 402 LOGICAL is_whole_dim(int arr_ast, int i); 403 LOGICAL is_whole_array(int arr_ast); 404 LOGICAL simply_contiguous(int arr_ast);
|