/dports/math/libpgmath/flang-d07daf3/tools/shared/ |
H A D | symfun.h | 54 #undef DTY 62 Precond(DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR); in DTyCharLength() 72 return (DTY(dtype) == TY_PTR) || (DTY(dtype) == TY_ARRAY); in DTySeqTyValid() 108 Precond(DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION); in DTyAlgTyMember() 114 Precond(DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION); in DTyAlgTySize() 125 Precond(DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION); in DTyAlgTyTag() 130 Precond(DTY(dtype) == -TY_STRUCT || DTY(dtype) == -TY_UNION); in DTyAlgTyTagNeg() 136 Precond(DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION); in DTyAlgTyAlign() 142 Precond(DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION); in DTyAlgTyInitCon() 149 Precond(DTY(dtype) == TY_PROC || DTY(dtype) == TY_PFUNC); in DTyReturnType() [all …]
|
/dports/math/libpgmath/flang-d07daf3/tools/flang1/flang1exe/ |
H A D | dtypeutl.c | 1124 DTY(dtyper + 1) = DTY(dtype + 1); in dtype_with_shape() 1636 if (DTY(d1) != DTY(d2)) in eq_dtype2() 1694 if (DTY(d1 + 1) == DTY(d2 + 1)) in eq_dtype2() 1699 if (DTY(DTY(d1 + 1)) == TY_PROC) { in eq_dtype2() 1704 if ((DTY(d1 + 2) && (DTY(d1 + 2) == DTY(d2 + 2))) || in eq_dtype2() 1875 if (DTY(d1) != DTY(d2)) { in cmpat_dtype() 1911 if (DTY(d1) != DTY(d2)) { in cmpat_dtype_with_size() 1975 if (DTY(d1 + 3) == DTY(d2 + 3)) in cmpat_dtype_with_size() 2014 if (DTY(d1) != DTY(d2)) in same_dtype() 2104 if (DTY(d1 + 1) == DTY(d2 + 1)) in same_dtype() [all …]
|
H A D | semutil.c | 323 size_of(DTY(from + 1)) == size_of(DTY(newcast + 1))) { in casttyp() 772 DTY(newtyp + 2) = DTY(oldtyp + 2); in cngtyp2() 1222 if ((DTY(dd) == TY_CHAR || DTY(dd) == TY_NCHAR)) { in mkexpr1() 3027 DTY(dtype + 2) = DTY(odtype + 2); in chksubstr() 3480 if (DTY(eldt) == TY_CHAR || DTY(eldt) == TY_NCHAR) { in subst_lhs_arrfn() 3488 if (DTY(eldt + 1) != DTY(d1 + 1)) in subst_lhs_arrfn() 3553 if (DTY(tmpdtype) != DTY(symdtype)) in subst_lhs_pointer() 3558 if (DTY(symddtype) != DTY(tmpddtype)) in subst_lhs_pointer() 3687 if (DTY(d1) != DTY(d2)) { in valid_assign_pointer_types() 3696 if (DTY(d1 + 1) && DTY(d2 + 1) && A_ALIASG(DTY(d1 + 1)) && in valid_assign_pointer_types() [all …]
|
H A D | exterf.c | 144 dty = DTY(dtype); in doubletype() 146 dtype = DTY(dtype + 1); in doubletype() 147 dty = DTY(dtype); in doubletype() 620 if (DTY(dtype + 1)) { in mark_dtype_ast_idstr() 623 } else if (DTY(dtype) == TY_ARRAY && DTY(dtype + 2) > 0) { in mark_dtype_ast_idstr() 1578 switch (DTY(dtype)) { in queue_dtype() 1620 if (DTY(dtype + 3)) in queue_dtype() 2071 switch (DTY(dtype)) { in export_dt() 2115 (int)DTY(dtype + 3), (int)DTY(dtype + 4)); in export_dt() 2164 if (DTY(dtype + 3) && !CFUNCG(DTY(dtype + 3))) { in export_dtypes() [all …]
|
H A D | semant.c | 5310 DTY(DTY(DTYPEG(sptr) + 1) + 2) == 0) { in semant1() 5315 DTY(DTY(DTYPEG(sptr) + 1) + 1) = dtype; in semant1() 5343 if (DTY(dtype) == TY_DERIVED && DTY(dtype + 3) && in semant1() 5534 if (DTY(d) == TY_DERIVED && DTY(d + 3) && DISTMEMG(DTY(d + 3))) { in semant1() 5775 if (DTY(d) == TY_DERIVED && DTY(d + 3) && DISTMEMG(DTY(d + 3))) { in semant1() 7680 if (DTY(d) == TY_DERIVED && DTY(d + 3) && DISTMEMG(DTY(d + 3))) { in semant1() 9194 if (DTY(d) == TY_DERIVED && DTY(d + 3) && DISTMEMG(DTY(d + 3))) { in semant1() 9288 if (DTY(d) == TY_DERIVED && DTY(d + 3) && DISTMEMG(DTY(d + 3))) { in semant1() 12359 if (DTY(dtype) != TY_CHAR && DTY(dtype) != TY_NCHAR) in set_char_attributes() 12902 DTY(ndtype + 2) = DTY(sdtype + 2); in set_string_type_from_init() [all …]
|
H A D | semant3.c | 916 if (!TY_ISINT(DTY(dtype)) && !TY_ISREAL(DTY(dtype))) { in semant3() 3692 if (DTY(dtype2) == TY_DERIVED && ABSTRACTG(DTY(dtype2 + 3))) { in semant3() 3739 if ((DTY(dtype) == TY_ARRAY && DTY(DTY(dtype + 1)) == TY_DERIVED && in semant3() 3740 UNLPOLYG(DTY(DTY(dtype + 1) + 3))) || in semant3() 3741 (DTY(dtype) == TY_DERIVED && UNLPOLYG(DTY(dtype + 3)))) { in semant3() 3797 if (DTY(dtype2) == TY_DERIVED && UNLPOLYG(DTY(dtype2 + 3))) { in semant3() 4100 if (DTY(dty) == TY_DERIVED && UNLPOLYG(DTY(dty + 3))) { in semant3() 4420 if (0 && DTY(dtype) != TY_DERIVED && DTY(dtype) != TY_CHAR) { in semant3() 4429 } else if (DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR) { in semant3() 4888 for (mem2 = DTY(dtype + 1), mem3 = DTY(dtype3 + 1); in semant3() [all …]
|
H A D | semfunc.c | 701 DTY(dtype + 1) = DTY(dtype1 + 1); in gen_and_assoc_tmp_ptr() 2291 DTY(dt + 1) = DTY(o_dt + 1); in gen_array_result() 4900 if (DTY(dtype) != DTY(SST_DTYPEG(ARG_STK(1)))) in ref_intrin() 5352 if (DTY(argdtype) != DTY(dtype1)) { in ref_intrin() 5811 if (DTY(dtyper + 1) < DTY(dtype2 + 1)) { in ref_pd() 7411 if (DTY(dtype2) != TY_ARRAY || DTY(dtype2 + 1) != DTY(dtyper + 1)) { in ref_pd() 7441 if (DTY(SST_DTYPEG(stkp) + 1) != DTY(dtyper + 1)) { in ref_pd() 8151 if (DTY(dtype1) != TY_CHAR && DTY(dtype1) != TY_NCHAR) { in ref_pd() 9905 if (DTY(DDTG(SST_DTYPEG(stkp))) != DTY(dtype1)) { in ref_pd() 11227 if (DTY(dtype1) == TY_CHAR && DTY(dtype2) == TY_CHAR) in ref_pd_subr() [all …]
|
H A D | rte.c | 192 if (DTY(dtype) != TY_ARRAY) { in sym_get_sdescr() 211 (DTY(DTYPEG(sptr)) == TY_CHAR || DTY(DTYPEG(sptr)) == TY_NCHAR)) { in sym_get_sdescr() 235 assert(DTY(DTYPEG(sptr)) == TY_DERIVED, in sym_get_sdescr() 238 tag = DTY(DTYPEG(sptr) + 3); in sym_get_sdescr() 352 if (DTY(DTYPEG(sptr)) == TY_PTR || IS_PROC_DUMMYG(sptr)) { in sym_get_sdescr() 376 assert(dtype && DTY(dtype) == TY_DERIVED, in sym_get_sdescr() 378 if (dtype && DTY(dtype) == TY_DERIVED) { in sym_get_sdescr() 492 if (DTY(DTYPEG(sptr)) == TY_ARRAY) { in get_all_descriptors() 506 if (DTY(DTYPEG(sptr)) != TY_ARRAY) in get_all_descriptors() 822 DTY(DTYPEG(sdsc)) != TY_ARRAY) in get_header_member() [all …]
|
H A D | lowersym.c | 1886 if ((DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_DERIVED)) in makefvallocal() 1889 if (DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR) in makefvallocal() 1892 if (DTY(dtype) == TY_CMPLX || DTY(dtype) == TY_DCMPLX || in makefvallocal() 2223 switch (DTY(dtype)) { in lower_use_datatype() 2309 if (DTY(dtype + 3)) in lower_use_datatype() 2429 if (DTY(dtype) < 0) in lower_put_datatype() 2516 switch (DTY(dtype)) { in lower_put_datatype() 3777 if (DTY(dtype) == TY_DERIVED && PARENTG(DTY(dtype + 1)) && in lower_symbol() 3902 if (DTY(DTYPEG(sptr)) == TY_HOLL || DTY(dtype) == TY_NCHAR) { in lower_symbol() 4998 DTY(DTY(dtype + 1)) != TY_PROC) { in lower_symbols() [all …]
|
H A D | semant2.c | 615 if (DTY(dtype) == TY_PTR && DTY(DTY(dtype + 1)) == TY_PROC) { in semant2() 619 int pp = DTY(dtype + 1); in semant2() 620 int iface = DTY(pp + 2); in semant2() 836 tag = DTY(dty + 3); in semant2() 840 for (mem1 = DTY(dty + 1), mem2 = DTY(sem.new_param_dt + 1); in semant2() 1397 dtype = DTY(dtype + 1); in semant2() 2729 dtype = DTY(dtype + 1); in has_private() 2731 tag = DTY(dtype + 3); in has_private() 2738 mem_sptr = DTY(dtype + 1); in has_private() 2770 tag = DTY(dtype + 3); in test_private_dtype() [all …]
|
H A D | semutil2.c | 1811 if (DTY(dt) == TY_CHAR && DTY(dtype) == TY_CHAR) in compute_size_expr() 1814 else if (DTY(dt) == TY_NCHAR && DTY(dtype) == TY_NCHAR) in compute_size_expr() 1840 if (DTY(dt) == TY_CHAR && DTY(dtype) == TY_CHAR) in compute_size_expr() 1843 else if (DTY(dt) == TY_NCHAR && DTY(dtype) == TY_NCHAR) in compute_size_expr() 2716 DTY(DTY(DTYPEG(mem_sptr) + 1)) == TY_PROC)) { in _constructf90() 4616 if ((DTY(dtype) != TY_ARRAY && DTY(dtype) != DTY(SST_DTYPEG(istkp))) || in init_types_compatable() 5242 if (DTY(dtype) != TY_DERIVED && DTY(dtype) != TY_STRUCT && in all_default_init() 6052 DTY(DTY(DTYPEG(member_sptr) + 1)) != TY_PROC) in chk_struct_constructor() 7433 if (DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR) in get_temp() 7520 if (DTY(dt) == TY_CHAR || DTY(dt) == TY_NCHAR) in get_arr_temp() [all …]
|
H A D | semfin.c | 446 DTY(ent_dtype + 1) != DTY(dtype + 1) || in semfin() 480 if (DTY(ent_dtype) == TY_DCMPLX || DTY(ent_dtype) == TY_CHAR || in semfin() 723 } else if ((DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR) && in do_common_blocks() 727 } else if ((DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR) && in do_common_blocks() 1648 if (DTY(dty) == TY_STRUCT || DTY(dty) == TY_UNION) in chk_evar() 1663 if (DTY(DTYPEG(sptr)) == TY_CHAR || DTY(DTYPEG(sptr)) == TY_NCHAR) { in chk_evar() 2137 ty = DTY(dtype); in nml_traverse() 2194 ty = DTY(dtype); in nml_check_item() 2467 } else if (DTY(dtype) == TY_CHAR || DTY(dtype) == TY_NCHAR) { in nml_emit_desc() 2698 (DTY(dt_dtype) == TY_CHAR || DTY(dt_dtype) == TY_NCHAR) && in do_save() [all …]
|
H A D | dinit.c | 240 member = DTY(dtype + 1); in dinit_data() 243 && (DTY(DTYPEG(member)) == TY_DERIVED) in dinit_data() 244 && (DTY(ict->dtype) != TY_DERIVED)) { in dinit_data() 790 dty = DTY(DTYPEG(con1)); in dinit_acl_val2() 841 if (DTY(dtype) == TY_CHAR) { in dinit_acl_val2() 946 if (DTY(dtypev) == TY_DERIVED) { in dinit_val() 966 switch (DTY(A_DTYPEG(astval))) { in dinit_val() 1017 if (DTY(dtype) == TY_CHAR && DTY(dtype + 1) == astb.i1) { in dinit_val() 1037 if (DTYG(dtypev) != DTY(dtype)) { in dinit_val() 1038 switch (DTY(dtype)) { in dinit_val() [all …]
|
H A D | lower.c | 210 switch (DTY(DTYPEG(gbl.currsub))) { in lower() 430 if (dtype && DTY(dtype) == TY_ARRAY) { in markid() 746 switch (DTY(dtype)) { in trav_struct() 791 for (mem = DTY(dtype + 1); mem != NOSYM; mem = SYMLKG(mem)) { in trav_struct() 810 elemsize = size_of(DTY(dtype + 1)); in trav_struct() 814 trav_struct(DTY(dtype + 1), addr); in trav_struct() 868 assert(DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_DERIVED || in pass_struct() 869 DTY(dtype) == TY_UNION || DT_ISCMPLX(dtype), in pass_struct() 923 if (DTY(retdtype) == TY_DERIVED || DTY(retdtype) == TY_STRUCT || in check_return() 924 DTY(retdtype) == TY_UNION || DT_ISCMPLX(retdtype)) in check_return()
|
H A D | semgnr.c | 699 if (DTY(ddum) == TY_ARRAY) { in tkr_match() 737 if (DTY(elddum) != DTY(eldact)) { in tkr_match() 759 } else if (DTY(elddum) == TY_DERIVED && UNLPOLYG(DTY(elddum + 3))) { in tkr_match() 1513 tag = DTY(dtype + 3); in check_defined_io2() 1638 tag = DTY(dtype + 3); in check_defined_io2() 1707 if (DTY(dtype) != TY_ARRAY || DTY(dtype + 1) != dt_int || in check_defined_io2() 1802 tag = DTY(chk_dtype + 3); in check_defined_io2() 1817 if (DTY(dtype) == TY_ARRAY) in dtype_has_defined_io() 1818 dtype = DTY(dtype + 1); in dtype_has_defined_io() 1819 if (DTY(dtype) != TY_DERIVED) in dtype_has_defined_io() [all …]
|
H A D | semfunc2.c | 765 if ((DTY(dt) == TY_CHAR || DTY(dt) == TY_NCHAR) && ADJLENG(sptr)) { in mkarg() 838 if ((DTY(dt) == TY_CHAR || DTY(dt) == TY_NCHAR) && ADJLENG(sptr)) { in mkarg() 1240 if (DTY(argtyp) == TY_CHAR || DTY(argtyp) == TY_NCHAR) { in chkarg() 2251 if (DTY(eldact) == TY_PTR && DTY(elddum) == TY_PROC) { in chk_arguments() 2254 } else if (DTY(eldact) == TY_PROC && DTY(elddum) == TY_PTR) { in chk_arguments() 2259 if (DTY(eldact) == TY_PROC && DTY(eldact + 5)) { in chk_arguments() 2290 if (DTY(eldact) == TY_CHAR || DTY(eldact) == TY_NCHAR) in chk_arguments() 2322 DTY(DTY(DTYPEG(sptr) + 1)) == TY_PROC)) { in chk_arguments() 2338 DTY(DTY(DTYPEG(sptr) + 1)) == TY_PROC)) { in chk_arguments() 2394 if (DTY(elddum) != DTY(eldact)) { in chk_arguments() [all …]
|
H A D | lowerilm.c | 1045 dtproc = DTY(dtype + 1); in handle_arguments() 1054 iface = DTY(dtproc + 2); in handle_arguments() 1157 if (DTY(dt) == TY_CHAR || DTY(dt) == TY_NCHAR) { in handle_arguments() 2560 switch (DTY(dtype)) { in llvm_lower_enddo_stmt() 2671 switch (DTY(dtype)) { in lower_enddo_stmt() 3444 DTY(eltype + 3) == 0 || !POINTERG(DTY(eltype + 3))) { in lower_stmt() 3731 if (DTY(dtype) == TY_DERIVED || DTY(dtype) == TY_STRUCT) { in lower_stmt() 3736 if ((DTY(dtype) == TY_DERIVED || DTY(dtype) == TY_STRUCT)) { in lower_stmt() 3738 if (DTY(dtype2) == TY_DERIVED || DTY(dtype2) == TY_STRUCT) { in lower_stmt() 5849 switch (DTY(dtype)) { in lower_typeload() [all …]
|
H A D | transfrm.c | 1690 if (DTY(dtype) == TY_ARRAY) in normalize_forall() 1691 dtype = DTY(dtype + 1); in normalize_forall() 1696 if (DTY(dtype) == TY_ARRAY) in normalize_forall() 1697 dtype = DTY(dtype + 1); in normalize_forall() 1703 dtype = DTY(dtype + 1); in normalize_forall() 2885 if (DTY(adtype + 1) == DTY(dtype + 1)) { in find_args() 4384 if (DTY(DTYPEG(sptrdest)) == TY_ARRAY && DTY(A_DTYPEG(astsrc)) != TY_ARRAY) { in rewrite_allocatable_assignment() 4451 (DTY(dtypedest) == TY_ARRAY || DTY(dtypedest) == TY_CHAR || in rewrite_allocatable_assignment() 4471 } else if (DTY(dtypedest) == TY_CHAR || DTY(dtypedest) == TY_NCHAR) { in rewrite_allocatable_assignment() 4517 if (DTY(dtypedest) == TY_CHAR || DTY(dtypedest) == TY_NCHAR ) { in rewrite_allocatable_assignment() [all …]
|
/dports/math/libpgmath/flang-d07daf3/tools/flang1/utils/symtab/ |
H A D | symtab.in.h | 63 #define DTY(d) (stb.dt.stg_base[d]) macro 69 #define DDTG(dt) (DTY(dt) == TY_ARRAY ? DTY(dt+1) : dt) 70 #define DTYG(dt) (DTY(dt) == TY_ARRAY ? DTY(DTY(dt+1)) : DTY(dt)) 73 #define DT_ISINT(dt) (dttypes[DTY(dt)]&_TY_INT) 80 #define DT_ISVEC(dt) (dttypes[DTY(dt)]&_TY_VEC) 81 #define DT_ISLOG(dt) (dttypes[DTY(dt)]&_TY_LOG) 85 #define DT_ISINT_ARR(dt) (DTY(dt)==TY_ARRAY && DT_ISINT(DTY(dt+1))) 86 #define DT_ISREAL_ARR(dt) (DTY(dt)==TY_ARRAY && DT_ISREAL(DTY(dt+1))) 87 #define DT_ISCMPLX_ARR(dt) (DTY(dt)==TY_ARRAY && DT_ISCMPLX(DTY(dt+1))) 88 #define DT_ISNUMERIC_ARR(dt) (DTY(dt)==TY_ARRAY && DT_ISNUMERIC(DTY(dt+1))) [all …]
|
/dports/math/libpgmath/flang-d07daf3/tools/flang2/utils/symtab/ |
H A D | symtab.in.h | 41 #define DTY(d) (stb.dt.stg_base[d]) macro 47 #define DDTG(dt) (DTY(dt) == TY_ARRAY ? DTY(dt+1) : dt) 48 #define DTYG(dt) (DTY(dt) == TY_ARRAY ? DTY(DTY(dt+1)) : DTY(dt)) 50 #define DT_ISINT(dt) (dttypes[DTY(dt)]&_TY_INT) 51 #define DT_ISREAL(dt) (dttypes[DTY(dt)]&_TY_REAL) 52 #define DT_ISCMPLX(dt) (dttypes[DTY(dt)]&_TY_CMPLX) 54 #define DT_ISBASIC(dt) (dttypes[DTY(dt)]&_TY_BASIC) 57 #define DT_ISVEC(dt) (dttypes[DTY(dt)]&_TY_VEC) 58 #define DT_ISLOG(dt) (dttypes[DTY(dt)]&_TY_LOG) 59 #define DT_ISWORD(dt) (dttypes[DTY(dt)]&_TY_WORD) [all …]
|
/dports/math/libpgmath/flang-d07daf3/tools/flang2/flang2exe/ |
H A D | dtypeutl.cpp | 76 return DTY(dtype); in get_ty_kind() 142 if (DTY(dtype) != TY_UNION && DTY(dtype) != TY_STRUCT) { in is_empty_typedef() 166 if (DTY(dtype) == TY_ARRAY) in no_data_components_recursive() 172 if (DTY(dtype) != TY_UNION && DTY(dtype) != TY_STRUCT) { in no_data_components_recursive() 219 switch (DTY(dtype)) { in _size_of() 423 switch (ty = DTY(dtype)) { in alignment() 734 DTY(dtype) > TY_MAX) { in getdtype() 742 switch (DTY(dtype)) { in getdtype() 822 switch (DTY(dtype)) { in extent_of() 911 switch (DTY(dtypeind)) { in _dmp_dent() [all …]
|
H A D | cgllvm.h | 37 ((DTY(d)) == TY_STRUCT || (DTY(d)) == TY_UNION || (DTY(d)) == TY_ARRAY) 38 #define COMPLEX_DTYPE(d) ((DTY(d)) == TY_CMPLX || (DTY(d)) == TY_DCMPLX) 39 #define VECTOR_DTYPE(d) ((DTY(d)) == TY_VECT)
|
H A D | llutil.cpp | 253 if (DTY(dtype) == TY_MOD && (DTY(dtype + 2) & MOD_VOLATILE)) in ldst_instr_flags_from_dtype() 290 switch (DTY(dtype)) { in ll_convert_basic_dtype_with_addrspace() 674 switch (DTY(dtype)) { in convert_dtype() 969 if (DTY(dtype) != TY_ARRAY && DTY(dtype) != TY_PTR && DTY(dtype) != TY_ANY) in make_lltype_from_arg_noproto() 1206 stb.tynames[DTY(sdtype)], (int)DTY(sdtype)) in make_lltype_from_sptr() 1264 if (DTY(sdtype) != TY_CHAR && DTY(sdtype) != TY_NCHAR) { in make_lltype_from_sptr() 2588 DTY(dtype), (stb.tynames[DTY(dtype)])) in llvm_fc_type() 3100 dty = DTY(dtype); in process_dtype_struct() 3154 dty = DTY(dtype); in process_ftn_dtype_struct() 3800 if (DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION) { in visit_flattened_dtype() [all …]
|
H A D | ll_ftn.cpp | 75 if (DTY(DTySeqTyElement(dtype)) == TY_CHAR) in need_charlen() 186 if (DTY(dtype) == TY_PTR && DTY(DTySeqTyElement(dtype)) == TY_PROC) in get_iface_sptr() 305 stb.tynames[DTY(return_dtype)]) in ll_process_routine_parameters() 342 ThisIsABug = DTY(param_dtype); in ll_process_routine_parameters() 394 } else if (TY_ARRAY == DTY(param_dtype) || in ll_process_routine_parameters() 477 if ((DTY(param_dtype) == TY_CHAR || DTY(param_dtype) == TY_NCHAR) && in ll_process_routine_parameters() 578 if (DTY(d_dtype) == TY_ARRAY) in is_iso_cptr() 581 if (DTY(d_dtype) != TY_STRUCT) in is_iso_cptr() 615 switch (DTY(dtype)) { in get_return_type() 747 if (DTY(dtype) != TY_PTR) in fix_llvm_fptriface() [all …]
|
/dports/math/libpgmath/flang-d07daf3/tools/flang2/flang2exe/aarch64-Linux/ |
H A D | ll_abi.cpp | 75 if (DTY(dtype) == TY_ARRAY) in update_homogeneous() 76 dtype = (DTYPE)DTY(dtype + 1); // ??? in update_homogeneous() 194 if (DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION) { in classify_common() 306 if (DT_ISINT(dtype) || DTY(dtype) == TY_PTR) { in ll_abi_classify_va_arg_dtype() 311 if (DTY(dtype) == TY_STRUCT || DTY(dtype) == TY_UNION) { in ll_abi_classify_va_arg_dtype()
|