/dports/math/libpgmath/flang-d07daf3/tools/flang2/flang2exe/ |
H A D | exp_ftn.cpp | 135 ILM *ilmp; in is_ishft() local 144 opc = ILM_OPC(ilmp); in is_ishft() 147 len += ILM_OPND(ilmp, 1); in is_ishft() 650 tmp = exp_mac(ILM_OPC(ilmp), ilmp, curilm); in exp_ac() 670 tmp = exp_mac(ILM_OPC(ilmp), ilmp, curilm); in exp_ac() 1085 tmp = ILM_OPND(ilmp, 1); in exp_ac() 1129 tmp = ILM_OPND(ilmp, 1); in exp_ac() 1458 arrilm = ILM_OPND(ilmp, 2); in compute_subscr() 2480 ILM *ilmp; in inlarr() local 2503 switch (ILM_OPC(ilmp)) { in inlarr() [all …]
|
H A D | exp_rte.h | 44 int exp_alloca(ILM *ilmp); 88 void exp_agoto(ILM *ilmp, int curilm); 103 void exp_call(ILM_OP opc, ILM *ilmp, int curilm); 108 void exp_cgoto(ILM *ilmp, int curilm); 113 void exp_end(ILM *ilmp, int curilm, bool is_func); 118 void exp_fstring(ILM_OP opc, ILM *ilmp, int curilm); 128 void exp_qjsr(char *ext, DTYPE res_dtype, ILM *ilmp, int curilm); 143 void exp_szero(ILM *ilmp, int curilm, int to, int from, int dtype); 148 void exp_zqjsr(char *ext, int res_dtype, ILM *ilmp, int curilm);
|
H A D | expsmp.cpp | 1427 sym = ILM_SymOPND(ilmp, 1); in exp_smp() 1448 sym = ILM_SymOPND(ilmp, 1); in exp_smp() 1658 sym = ILM_SymOPND(ilmp, 1); in exp_smp() 1752 sym = ILM_SymOPND(ilmp, 1); in exp_smp() 1959 sym = ILM_SymOPND(ilmp, 1); in exp_smp() 2038 sym = ILM_SymOPND(ilmp, 1); in exp_smp() 2088 argilm = ILM_OPND(ilmp, 2); in exp_smp() 2109 argilm = ILM_OPND(ilmp, 2); in exp_smp() 2122 argilm = ILM_OPND(ilmp, 2); in exp_smp() 2405 sym = ILM_OPND(ilmp, 1); in exp_smp() [all …]
|
H A D | exp_ftn.h | 51 void exp_ac(ILM_OP opc, ILM *ilmp, int curilm); 56 void exp_array(ILM_OP opc, ILM *ilmp, int curilm); 61 void exp_bran(ILM_OP opc, ILM *ilmp, int curilm); 66 void exp_misc(ILM_OP opc, ILM *ilmp, int curilm);
|
H A D | expatomics.h | 59 int exp_mp_atomic_read(ILM *ilmp); 124 void exp_mp_atomic_capture(ILM *ilmp); 129 void exp_mp_atomic_update(ILM *ilmp); 134 void exp_mp_atomic_write(ILM *ilmp);
|
H A D | expand.cpp | 296 opc = ILM_OPC(ilmp); in expand() 942 ILM *ilmp; in optional_missing_ilm() local 943 ilmp = ilmpin; in optional_missing_ilm() 957 ilmp = (ILM *)(ilmb.ilm_base + ILM_OPND(ilmp, 1)); in optional_missing_ilm() 961 ilmp = (ILM *)(ilmb.ilm_base + ILM_OPND(ilmp, 2)); in optional_missing_ilm() 1037 SetILM_OPC(ilmp, opc); in replace_by_zero() 1038 ILM_OPND(ilmp, 1) = i1; in replace_by_zero() 1079 i1 = ILM_OPND(ilmp, 1); in replace_by_one() 1095 SetILM_OPC(ilmp, opc); in replace_by_one() 1096 ILM_OPND(ilmp, 1) = i1; in replace_by_one() [all …]
|
H A D | ompaccel.cpp | 1758 nlower = ILM_SymOPND(ilmp, 1); in exp_ompaccel_mploop() 1759 nupper = ILM_SymOPND(ilmp, 2); in exp_ompaccel_mploop() 1760 nstride = ILM_SymOPND(ilmp, 3); in exp_ompaccel_mploop() 1776 loop_args.chunk = ILM_SymOPND(ilmp, 4); in exp_ompaccel_mploop() 1777 loop_args.last = ILM_SymOPND(ilmp, 5); in exp_ompaccel_mploop() 1951 exp_ompaccel_ereduction(ilmp, curilm); in exp_ompaccel_reduction() 2052 argilm = ILM_OPND(ilmp, 1); in exp_ompaccel_map() 2065 exp_ompaccel_emap(ILM *ilmp, int curilm) in exp_ompaccel_emap() argument 2102 sptr = ILM_SymOPND(ilmp, 1); in exp_ompaccel_looptripcount() 2113 ILM_SymOPND(ilmp, 1), ILM_SymOPND(ilmp, 2), ILM_SymOPND(ilmp, 3)); in exp_ompaccel_reductionitem() [all …]
|
H A D | ompaccel.h | 330 void exp_ompaccel_mploop(ILM *ilmp, int); 334 void exp_ompaccel_mploopfini(ILM *ilmp, int, int); 338 void exp_ompaccel_bpar(ILM *ilmp, int, SPTR, SPTR, int(incrOutlinedCnt())); 346 void exp_ompaccel_bteams(ILM *ilmp, int, int, SPTR, SPTR, 351 void exp_ompaccel_eteams(ILM *ilmp, int, int, int(decrOutlinedCnt()));
|
H A D | expatomics.cpp | 1829 remove_weak_parameter(ILM *ilmp) in remove_weak_parameter() argument 1834 ILM_OPND(ilmp, 1) = 6; in remove_weak_parameter() 1837 ILM_OPND(ilmp, callee_index + 5) = ILM_OPND(ilmp, callee_index + 6); in remove_weak_parameter() 1838 ILM_OPND(ilmp, callee_index + 6) = ILM_OPND(ilmp, callee_index + 7); in remove_weak_parameter() 2116 DEBUG_ASSERT(ilmp->opc == IM_FAPPLY || ilmp->opc == IM_VAPPLY, in exp_atomic_intrinsic() 2120 n = ILM_OPND(ilmp, 1); in exp_atomic_intrinsic() 2298 if (ilmp->opc == IM_VAPPLY) { in exp_atomic_intrinsic() 2483 get_dtype_from_ilm(ILM *ilmp) in get_dtype_from_ilm() argument 2511 exp_mp_atomic_read(ILM *ilmp) in exp_mp_atomic_read() argument 2590 exp_mp_atomic_write(ILM *ilmp) in exp_mp_atomic_write() argument [all …]
|
H A D | exp_rte.cpp | 2075 exp_alloca(ILM *ilmp) in exp_alloca() argument 3387 ilm1 = ILM_OPND(ilmp, 3); in exp_call() 3488 ilm1 = ILM_OPND(ilmp, i); in exp_call() 3519 ilm1 = ILM_OPND(ilmp, 6); in exp_call() 3544 ilm1 = ILM_OPND(ilmp, 6); in exp_call() 3570 ilm1 = ILM_OPND(ilmp, 3); in exp_call() 5108 op1 = ILM_OPND(ilmp, 1); in exp_fstring() 5109 op2 = ILM_OPND(ilmp, 2); in exp_fstring() 5660 ILM *ilmp; in getstr() local 5666 if (ILM_OPC(ilmp) == IM_SCAT || ILM_OPC(ilmp) == IM_NSCAT) { in getstr() [all …]
|
H A D | expsmp.h | 112 void exp_smp(ILM_OP opc, ILM *ilmp, int curilm);
|
H A D | ilmutil.h | 93 int ilm_return_slot_index(ILM_T *ilmp);
|
H A D | ilmutil.cpp | 264 ilm_return_slot_index(ILM_T *ilmp) in ilm_return_slot_index() argument 266 DEBUG_ASSERT(0 < ilmp[0] && ilmp[0] < N_ILM, in ilm_return_slot_index() 271 switch (ilmp[0]) { in ilm_return_slot_index() 287 interr("ilm_return_slot_index: ILM not implemented yet", ilmp[0], ERR_Severe); in ilm_return_slot_index()
|
H A D | semant.h | 489 ILM_T *ilmp; /* ptr to ILM's */ member 623 ILM_T *ilmp; /* ilm pointer to ilms if adjustable array */ member
|
H A D | dtypeutl.cpp | 668 char *ilmp; in get_aux_arrdsc() member
|
/dports/math/libpgmath/flang-d07daf3/tools/shared/ |
H A D | expand.h | 255 int exp_mac(ILM_OP opc, ILM *ilmp, int curilm); 319 void exp_load(ILM_OP opc, ILM *ilmp, int curilm); 324 void exp_pure(SPTR extsym, int nargs, ILM *ilmp, int curilm); 329 void exp_ref(ILM_OP opc, ILM *ilmp, int curilm); 334 void exp_store(ILM_OP opc, ILM *ilmp, int curilm); 356 void replace_by_one(ILM_OP opc, ILM *ilmp, int curilm); 361 void replace_by_zero(ILM_OP opc, ILM *ilmp, int curilm);
|
/dports/math/libpgmath/flang-d07daf3/tools/flang2/utils/symtab/ |
H A D | symtab.in.h | 198 ILM_T *ilmp; member 212 #define AD_ILMP(p) ((p)->ilmp)
|