Home
last modified time | relevance | path

Searched refs:AD_NUMDIM (Results 1 – 25 of 38) sorted by relevance

12

/dports/math/libpgmath/flang-d07daf3/tools/flang1/utils/symtab/
H A Dsymtab.in.h226 #define AD_NUMDIM(p) ((p)->numdim) macro
239 #define AD_NUMELM(p) ((p)->b[AD_NUMDIM(p)].mlpyr)
244 #define ADD_NUMDIM(dtyp) AD_NUMDIM(AD_DPTR(dtyp))
/dports/math/libpgmath/flang-d07daf3/tools/flang2/flang2exe/
H A Ddtypeutl.cpp684 AD_NUMDIM(ad) = numdim; in get_aux_arrdsc()
760 numdim = AD_NUMDIM(ad); in getdtype()
827 numdim = AD_NUMDIM(ad); in extent_of()
961 numdim = AD_NUMDIM(ad); in _dmp_dent()
H A Dtgtutil.cpp322 int j, numdim = AD_NUMDIM(ad); in _tgt_target_fill_size()
330 int numdim = AD_NUMDIM(ad); in _tgt_target_fill_size()
H A Dexputil.cpp86 AD_NUMDIM(ad) = 1; in mkarglist()
H A Doutliner.cpp2482 int numdim = AD_NUMDIM(org_ad); in ompaccel_copy_arraydescriptors()
2486 AD_NUMDIM(new_ad) = numdim; in ompaccel_copy_arraydescriptors()
H A Dupper.cpp1756 AD_NUMDIM(ad) = ndim; in read_datatype()
1850 ndim = AD_NUMDIM(ad); in fix_datatype()
2228 AD_NUMDIM(ad) = 1; in read_symbol()
4070 AD_NUMDIM(ad) = 1; in create_threadprivate_dtype()
H A Ddinit.cpp2106 if (sb.ndims != AD_NUMDIM(adsc)) { in eval_const_array_section()
2111 ndims = AD_NUMDIM(adsc); in eval_const_array_section()
3197 arr_ndims = index.ndims = AD_NUMDIM(adsc); in eval_minval_or_maxval()
4019 rank = AD_NUMDIM(adsc); in eval_reshape()
H A Dmwd.cpp2899 numdim = AD_NUMDIM(ad); in _putdtype()
3013 numdim = AD_NUMDIM(ad); in putdtypex()
3112 numdim = AD_NUMDIM(ad); in dumpdtype()
H A Dilmutil.cpp1499 numdim = AD_NUMDIM(ad); in put_dtype()
/dports/math/libpgmath/flang-d07daf3/tools/flang2/utils/symtab/
H A Dsymtab.in.h208 #define AD_NUMDIM(p) ((p)->numdim) macro
216 #define AD_NUMELM(p) ((p)->b[AD_NUMDIM(p)].mlpyr)
/dports/math/libpgmath/flang-d07daf3/tools/flang1/flang1exe/
H A Ddtypeutl.c2532 numdim = AD_NUMDIM(ad); in getdtype()
2773 numdim = AD_NUMDIM(ad); in _dmp_dent()
3105 AD_NUMDIM(ad) = numdim; in get_aux_arrdsc()
3115 int numdim = AD_NUMDIM(o_ad); in dup_array_dtype()
3152 o_numdim = AD_NUMDIM(o_ad); in reduc_rank_dtype()
3190 AD_NUMDIM(ad) = numdim; in reduc_rank_dtype()
3211 return AD_NUMDIM(AD_DPTR(dtype)); in rank_of()
3320 ndim = AD_NUMDIM(ad1); in conformable()
3321 if (ndim != AD_NUMDIM(ad2)) in conformable()
H A Dbblock.c562 ndim = AD_NUMDIM(ad); in find_assumshp_dep()
686 ndims = AD_NUMDIM(ad); in gen_early_bnd_dependencies()
803 ndims = AD_NUMDIM(ad); in gen_early_array_bnds()
877 numdim = AD_NUMDIM(ad); in add_bound_assignments()
H A Dinliner.c1395 ndims = AD_NUMDIM(ad); in allocate_array()
1845 ndims = AD_NUMDIM(ad); in rewrite_inlined_args()
1968 rankDummy = AD_NUMDIM(adDummy); in replace_arg()
2040 assert(ndimsAct == AD_NUMDIM(adDummy), "assign_bounds: different ranks", in assign_bounds()
2082 assert(dim < AD_NUMDIM(ad), "get_subscr: bad dim", ast, 4); in get_subscr()
H A Ddpm_out.c2790 ndimsB = AD_NUMDIM(adB); in bounds_depends()
2793 ndimsA = AD_NUMDIM(adA); in bounds_depends()
3314 ndims = AD_NUMDIM(ad); in is_f77_adjustable()
3985 i = AD_NUMDIM(ad) - 1; in set_assumsz_bound()
4103 r = AD_NUMDIM(ad); in set_assumed_bounds()
4397 r = AD_NUMDIM(ad); in allocate_one_auto()
4553 numdim = AD_NUMDIM(ad); in add_adjarr_bounds_extr_f77()
4612 ndim = AD_NUMDIM(ad); in update_bounds_with_actual()
4731 numdim = AD_NUMDIM(ad); in add_auto_bounds()
5154 numdim = AD_NUMDIM(ad); in add_bound_assignments()
H A Dsemutil.c1595 numdim = AD_NUMDIM(ad); in mklvalue()
1607 numdim = AD_NUMDIM(ad); in mklvalue()
1661 numdim = AD_NUMDIM(ad); in mklvalue()
2353 numdim = AD_NUMDIM(AD_DPTR(dtype)); in is_substring()
2617 numdim = AD_NUMDIM(ad); in ref_array()
3216 if (AD_NUMDIM(ad) <= ndim) in assign_array_w_forall()
3220 for (; i < AD_NUMDIM(ad); i++) { in assign_array_w_forall()
3513 if (nd > AD_NUMDIM(ad)) in subst_lhs_arrfn()
4336 nsubs = AD_NUMDIM(ad); in mk_component_ast()
4346 ndim = AD_NUMDIM(ad); in mk_component_ast()
[all …]
H A Dsymutl.c1221 if (ndim != AD_NUMDIM(tad)) in chk_temp_bnds()
1505 n = AD_NUMDIM(ad); in chk_assign_sptr()
1712 n = AD_NUMDIM(ad); in check_small_allocatable()
1827 n = AD_NUMDIM(ad); in chk_reduc_sptr()
2003 n = AD_NUMDIM(ad); in mk_spread_sptr()
2178 n = AD_NUMDIM(ad1); in mk_matmul_sptr()
2221 n = AD_NUMDIM(ad2); in mk_matmul_sptr()
2391 n = AD_NUMDIM(ad); in mk_transpose_sptr()
H A Dsemgnr.c700 if (AD_NUMDIM(AD_DPTR(ddum)) != rank) { in tkr_match()
702 AD_NUMDIM(AD_DPTR(ddum)) == 1) { in tkr_match()
1302 *rank_p = AD_NUMDIM(AD_DPTR(dtype)); in get_type_rank()
H A Dhlvect.c315 AD_NUMDIM(ad) = 1; in hlv_getvsym()
H A Dsemsym.c589 ndim = AD_NUMDIM(ad); in set_internref_flag()
1443 numdim = AD_NUMDIM(ad); in ref_based_object_sc()
1703 ndim = AD_NUMDIM(ad); in decl_private_sym()
H A Dsemfin.c1704 if (dim >= AD_NUMDIM(ad)) in chk_evar()
1718 if (dim != AD_NUMDIM(ad)) { in chk_evar()
2459 ndims = AD_NUMDIM(ad); in nml_emit_desc()
3152 int ndim = AD_NUMDIM(ad); in bounds_contain_automatics()
H A Dsymtab.c1286 for (i = 0; i < AD_NUMDIM(ad); ++i) { in symdentry()
2653 numdim = AD_NUMDIM(ad); in compatible_characteristics()
2977 sem.arrdim.ndim = AD_NUMDIM(ad); in update_arrdsc()
H A Dsemant.c5540 int numdim = AD_NUMDIM(ad); in semant1()
5702 ndim = AD_NUMDIM(ad1); in semant1()
5703 if (ndim != AD_NUMDIM(ad2)) { in semant1()
8942 for (dim = 0; dim < AD_NUMDIM(ad); ++dim) { in semant1()
9010 if (AD_NUMDIM(AD_DPTR(DTYPEG(sptr))) != in semant1()
9011 AD_NUMDIM(AD_DPTR(SST_DTYPEG(RHS(3))))) { in semant1()
9219 int numdim = AD_NUMDIM(ad); in semant1()
9403 ndim = AD_NUMDIM(ad1); in semant1()
9404 if (ndim != AD_NUMDIM(ad2)) { in semant1()
13700 numdim = AD_NUMDIM(ad); in fixup_ident_bounds()
[all …]
H A Dsemutil2.c167 ndim = AD_NUMDIM(ad); in to_assumed_shape()
820 numdim = AD_NUMDIM(ad); in mk_defer_shape()
853 int numdim = AD_NUMDIM(ad); in mk_assumed_shape()
1407 numdim = AD_NUMDIM(ad); in size_of_array()
7310 ndim = AD_NUMDIM(ad); in dinit_varref()
9897 rank = AD_NUMDIM(adsc); in eval_reshape()
10453 if (sb.ndims != AD_NUMDIM(adsc)) { in eval_const_array_section()
10458 ndims = AD_NUMDIM(adsc); in eval_const_array_section()
11892 numdim = AD_NUMDIM(ad); in fix_mem_bounds()
12063 int ndims = AD_NUMDIM(ad); in init_sdsc()
[all …]
H A Dfunc.c1006 ndim = AD_NUMDIM(ad); in convert_subscript()
1023 ndim = AD_NUMDIM(ad); in convert_subscript()
6040 AD_NUMDIM(addest) = nbrloops - 1; in inline_reduction_f90()
6215 tmpndim = AD_NUMDIM(ad); in inline_reduction_f90()
6466 destndim = AD_NUMDIM(ad); in inline_reduction_f90()
H A Dastout.c3324 numdim = AD_NUMDIM(ad); in deferred_to_pointer()
3481 assert(ndim == AD_NUMDIM(ad), "gen_bnd_assn:ndim not equal", asym, 3); in gen_bnd_assn()

12