| /dports/math/libpgmath/flang-d07daf3/tools/flang2/flang2exe/ |
| H A D | exp_fvec.cpp | 41 void eval_fvec(int ilmx) in eval_fvec() argument
45 opc = ILM_OPC((ILM *)(ilmb.ilm_base + ilmx)); in eval_fvec()
47 interr("eval_fvec: vector not impl", ilmx, ERR_Severe); in eval_fvec()
49 eval_ilm(ilmx); in eval_fvec()
|
| H A D | expand.cpp | 278 for (ilmx = 0; ilmx < expb.nilms; ilmx += len) { in expand()
287 ILM_RESULT(ilmx) = 0; in expand()
288 ILM_EXPANDED_FOR(ilmx) = 0; in expand()
316 eval_ilm(ilmx); in expand()
449 eval_ilm(int ilmx) in eval_ilm() argument
591 exp_ref(opcx, ilmpx, ilmx); in eval_ilm()
595 exp_load(opcx, ilmpx, ilmx); in eval_ilm()
603 exp_bran(opcx, ilmpx, ilmx); in eval_ilm()
613 exp_ac(opcx, ilmpx, ilmx); in eval_ilm()
625 exp_smp(opcx, ilmpx, ilmx); in eval_ilm()
[all …]
|
| H A D | exputil.cpp | 428 check_ilm(int ilmx, int ilix) in check_ilm() argument
467 "check_ilm, ILM expr: ilm %d, old ili %d, cse ili %d\n", ilmx, in check_ilm()
511 if ((blk = ILM_BLOCK(ilmx)) == expb.curbih) { in check_ilm()
512 if (ILM_OPC((ILM *)(ilmb.ilm_base + ilmx)) == IM_PSEUDOST) { in check_ilm()
521 int use = ILM_OPND((ILM *)(ilmb.ilm_base + ilmx), 2); in check_ilm()
522 int ilmx2 = ilmx + ilms[IM_PSEUDOST].oprs + 1; in check_ilm()
556 ilmx, ilix, cse); in check_ilm()
647 ILM_NME(ilmx) = addnme(NT_IND, SPTR_NULL, nme, (INT)0); in check_ilm()
682 ilmx, iltx, ilix); in check_ilm()
715 ilms[ILM_OPC((ILM *)(ilmb.ilm_base + ilmx))].name, ilix, opc); in check_ilm()
[all …]
|
| H A D | scope.cpp | 653 int ilmx, len; in find_scope_labels() local
658 for (ilmx = BOS_SIZE; ilmx < numilms; ilmx += len) { in find_scope_labels()
659 int opc = ilmb.ilm_base[ilmx]; in find_scope_labels()
661 int label = ilmb.ilm_base[ilmx + 1]; in find_scope_labels()
667 len += ilmb.ilm_base[ilmx + 1]; /* include the variable opnds */ in find_scope_labels()
|
| H A D | outliner.h | 201 int ll_rewrite_ilms(int lineno, int ilmx, int len);
305 void llWriteNopILM(int lineno, int ilmx, int len);
|
| H A D | ilmutil.cpp | 1801 int ilmx, opc, len; in rdgilms() local
1867 for (ilmx = BOS_SIZE; ilmx < nilms; ilmx += len) { in rdgilms()
1868 opc = gilmb.ilm_base[pos + ilmx]; in rdgilms()
1880 len += gilmb.ilm_base[pos + ilmx + 1]; /* include the variable opnds */ in rdgilms()
2055 int ilmx, len, newnumilms, nilms, begin_ilm; in count_ilms() local
2062 for (ilmx = begin_ilm; ilmx < nilms; ilmx += len) { in count_ilms()
2063 opc = (ILM_OP)ilmb.ilm_base[ilmx]; // ??? in count_ilms()
2069 len += *(ilmb.ilm_base + ilmx + 1); in count_ilms()
|
| H A D | outliner.cpp | 983 llGetILMLen(int ilmx) in llGetILMLen() argument
1050 len = llGetILMLen(ilmx); in ll_rewrite_ilms()
1052 if (ilmx == 0 || pos == 0 || pos < ilmx) { in ll_rewrite_ilms()
1053 pos = ilmx; in ll_rewrite_ilms()
1069 len = llGetILMLen(ilmx); in ll_rewrite_ilms()
1070 if (ilmx == 0) { in ll_rewrite_ilms()
1076 i = ilmx; in ll_rewrite_ilms()
1090 len = llGetILMLen(ilmx); in ll_rewrite_ilms()
1248 tlen = llGetILMLen(ilmx); in llWriteNopILM()
1262 len = llGetILMLen(ilmx); in llWriteNopILM()
[all …]
|
| H A D | exp_fvec.h | 24 void eval_fvec(int ilmx);
|
| H A D | exputil.h | 43 int check_ilm(int ilmx, int ilix);
|
| H A D | exp_ftn.cpp | 137 int len, bsize, ilmx; in is_ishft() local
140 ilmx = 0; in is_ishft()
142 ilmx += len; in is_ishft()
151 } while (curilm + ilmx + len < bsize); in is_ishft()
160 int ilmx; in exp_ac() local
1296 ilix = ILI_OF(ilmx); in exp_ac()
1308 opcx = (ILI_OP) NME_OF(ilmx); in exp_ac()
1323 opcx = (ILI_OP) NME_OF(ilmx); in exp_ac()
1342 opcx = (ILI_OP) NME_OF(ilmx); in exp_ac()
3654 int ilmx; in exp_misc() local
[all …]
|
| H A D | exp_rte.cpp | 3003 struct_ret_tmp(int ilmx) in struct_ret_tmp() argument
3008 ilmpx = (ILM *)(ilmb.ilm_base + ilmx); in struct_ret_tmp()
3012 "struct_ret_tmp bad SFUNC", ilmx, ERR_Severe); in struct_ret_tmp()
3015 assert(ILM_OPC(ilmpx) == IM_BASE, "struct_ret_tmp bad SFUNC not base", ilmx, in struct_ret_tmp()
5925 int ilmx, len; in AssignAddresses() local
5929 for (ilmx = 0; ilmx < numilms; ilmx += len) { in AssignAddresses()
5931 opc = ILM_OPC(ilmx); in AssignAddresses()
5934 len += ILM_OPND(ilmx, 1); in AssignAddresses()
5939 SPTR sptr = ILM_SymOPND(ilmx, opnd); in AssignAddresses()
|
| H A D | expatomics.cpp | 2127 int ilmx = ILM_OPND(ilmp, callee_index + 1 + i); /* locates ARG ilm */ in exp_atomic_intrinsic() local
2128 ILM *ilmpx = (ILM *)(ilmb.ilm_base + ilmx); in exp_atomic_intrinsic()
2129 ilmx = ILM_OPND(ilmpx, 2); in exp_atomic_intrinsic()
2130 nme[i] = NME_OF(ilmx); in exp_atomic_intrinsic()
2131 opnd[i] = ILI_OF(ilmx); in exp_atomic_intrinsic()
|
| /dports/math/libpgmath/flang-d07daf3/tools/shared/ |
| H A D | expand.h | 293 void eval_ilm(int ilmx);
|