2 * Copyright (C) 2014-2022 Free Software Foundation, Inc.
4 * This file is part of GNU lightning.
6 * GNU lightning is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU Lesser General Public License as published
8 * by the Free Software Foundation; either version 3, or (at your option)
11 * GNU lightning is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
14 * License for more details.
17 * Paulo Cesar Pereira de Andrade
21 # define _F2_REGNO 0x02
22 # define _F3_REGNO 0x03
23 # define _F4_REGNO 0x04
24 # define _F5_REGNO 0x05
25 # define _F6_REGNO 0x06
26 # define _F7_REGNO 0x07
27 # define _F8_REGNO 0x08
28 # define _F9_REGNO 0x09
29 # define F_P(o,ra,rb,f,rc) _Opr(_jit,o,ra,rb,f,rc)
30 static void _Opr(jit_state_t*,int,int,int,unsigned int,int);
31 # define ADDF(ra,rb,rc) F_P(0x15,ra,rb,0x080,rc)
32 # define ADDG(ra,rb,rc) F_P(0x15,ra,rb,0x0a0,rc)
33 # define ADDS(ra,rb,rc) F_P(0x16,ra,rb,0x080,rc)
34 # define ADDS_C(ra,rb,rc) F_P(0x16,ra,rb,0x000,rc)
35 # define ADDS_M(ra,rb,rc) F_P(0x16,ra,rb,0x040,rc)
36 # define ADDS_D(ra,rb,rc) F_P(0x16,ra,rb,0x0c0,rc)
37 # define ADDS_U(ra,rb,rc) F_P(0x16,ra,rb,0x180,rc)
38 # define ADDS_UC(ra,rb,rc) F_P(0x16,ra,rb,0x100,rc)
39 # define ADDS_UM(ra,rb,rc) F_P(0x16,ra,rb,0x140,rc)
40 # define ADDS_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1c0,rc)
41 # define ADDS_SU(ra,rb,rc) F_P(0x16,ra,rb,0x580,rc)
42 # define ADDS_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x500,rc)
43 # define ADDS_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x540,rc)
44 # define ADDS_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5c0,rc)
45 # define ADDS_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x780,rc)
46 # define ADDS_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x700,rc)
47 # define ADDS_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x740,rc)
48 # define ADDS_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7c0,rc)
49 # define ADDT(ra,rb,rc) F_P(0x16,ra,rb,0x0a0,rc)
50 # define ADDT_C(ra,rb,rc) F_P(0x16,ra,rb,0x020,rc)
51 # define ADDT_M(ra,rb,rc) F_P(0x16,ra,rb,0x060,rc)
52 # define ADDT_D(ra,rb,rc) F_P(0x16,ra,rb,0x0e0,rc)
53 # define ADDT_U(ra,rb,rc) F_P(0x16,ra,rb,0x1a0,rc)
54 # define ADDT_UC(ra,rb,rc) F_P(0x16,ra,rb,0x120,rc)
55 # define ADDT_UM(ra,rb,rc) F_P(0x16,ra,rb,0x160,rc)
56 # define ADDT_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1e0,rc)
57 # define ADDT_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a0,rc)
58 # define ADDT_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x520,rc)
59 # define ADDT_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x560,rc)
60 # define ADDT_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5e0,rc)
61 # define ADDT_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x7a0,rc)
62 # define ADDT_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x720,rc)
63 # define ADDT_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x760,rc)
64 # define ADDT_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7e0,rc)
65 # define CMPGEQ(ra,rb,rc) F_P(0x15,ra,rb,0x0a5,rc)
66 # define CMPGLE(ra,rb,rc) F_P(0x15,ra,rb,0x0a7,rc)
67 # define CMPTEQ(ra,rb,rc) F_P(0x16,ra,rb,0x0a5,rc)
68 # define CMPTEQ_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a5,rc)
69 # define CMPTLE(ra,rb,rc) F_P(0x16,ra,rb,0x0a7,rc)
70 # define CMPTLE_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a7,rc)
71 # define CMPTLT(ra,rb,rc) F_P(0x16,ra,rb,0x0a6,rc)
72 # define CMPTLT_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a6,rc)
73 # define CMPTUN(ra,rb,rc) F_P(0x16,ra,rb,0x0a4,rc)
74 # define CMPTUN_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a4,rc)
75 # define CPYS(ra,rb,rc) F_P(0x17,ra,rb,0x020,rc)
76 # define CPYSE(ra,rb,rc) F_P(0x17,ra,rb,0x022,rc)
77 # define CPYSN(ra,rb,rc) F_P(0x17,ra,rb,0x021,rc)
78 # define DIVF(ra,rb,rc) F_P(0x15,ra,rb,0x083,rc)
79 # define DIVG(ra,rb,rc) F_P(0x15,ra,rb,0x0a3,rc)
80 # define DIVS(ra,rb,rc) F_P(0x16,ra,rb,0x083,rc)
81 # define DIVS_C(ra,rb,rc) F_P(0x16,ra,rb,0x003,rc)
82 # define DIVS_M(ra,rb,rc) F_P(0x16,ra,rb,0x043,rc)
83 # define DIVS_D(ra,rb,rc) F_P(0x16,ra,rb,0x0c3,rc)
84 # define DIVS_U(ra,rb,rc) F_P(0x16,ra,rb,0x183,rc)
85 # define DIVS_UC(ra,rb,rc) F_P(0x16,ra,rb,0x103,rc)
86 # define DIVS_UM(ra,rb,rc) F_P(0x16,ra,rb,0x143,rc)
87 # define DIVS_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1c3,rc)
88 # define DIVS_SU(ra,rb,rc) F_P(0x16,ra,rb,0x583,rc)
89 # define DIVS_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x503,rc)
90 # define DIVS_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x543,rc)
91 # define DIVS_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5c3,rc)
92 # define DIVS_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x783,rc)
93 # define DIVS_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x703,rc)
94 # define DIVS_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x743,rc)
95 # define DIVS_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7c3,rc)
96 # define DIVT(ra,rb,rc) F_P(0x16,ra,rb,0x0a3,rc)
97 # define DIVT_C(ra,rb,rc) F_P(0x16,ra,rb,0x023,rc)
98 # define DIVT_M(ra,rb,rc) F_P(0x16,ra,rb,0x063,rc)
99 # define DIVT_D(ra,rb,rc) F_P(0x16,ra,rb,0x0e3,rc)
100 # define DIVT_U(ra,rb,rc) F_P(0x16,ra,rb,0x1a3,rc)
101 # define DIVT_UC(ra,rb,rc) F_P(0x16,ra,rb,0x123,rc)
102 # define DIVT_UM(ra,rb,rc) F_P(0x16,ra,rb,0x163,rc)
103 # define DIVT_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1e3,rc)
104 # define DIVT_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a3,rc)
105 # define DIVT_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x523,rc)
106 # define DIVT_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x563,rc)
107 # define DIVT_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5e3,rc)
108 # define DIVT_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x7a3,rc)
109 # define DIVT_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x723,rc)
110 # define DIVT_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x7a3,rc)
111 # define DIVT_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7e3,rc)
112 # define CVTDG(rb,rc) F_P(0x15,_R31_REGNO,rb,0x09e,rc)
113 # define CVTGD(rb,rc) F_P(0x15,_R31_REGNO,rb,0x0ad,rc)
114 # define CVTGF(rb,rc) F_P(0x15,_R31_REGNO,rb,0x0ac,rc)
115 # define CVTGQ(rb,rc) F_P(0x15,_R31_REGNO,rb,0x0af,rc)
116 # define CVTLQ(rb,rc) F_P(0x17,_R31_REGNO,rb,0x010,rc)
117 # define CVTQF(rb,rc) F_P(0x15,_R31_REGNO,rb,0x0bc,rc)
118 # define CVTQG(rb,rc) F_P(0x15,_R31_REGNO,rb,0x0be,rc)
119 # define CVTQL(rb,rc) F_P(0x17,_R31_REGNO,rb,0x030,rc)
120 # define CVTQS(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0bc,rc)
121 # define CVTQS_C(rb,rc) F_P(0x16,_R31_REGNO,rb,0x03c,rc)
122 # define CVTQS_M(rb,rc) F_P(0x16,_R31_REGNO,rb,0x07c,rc)
123 # define CVTQS_D(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0fc,rc)
124 # define CVTQS_SUI(rb,rc) F_P(0x16,_R31_REGNO,rb,0x7bc,rc)
125 # define CVTQS_SUIC(rb,rc) F_P(0x16,_R31_REGNO,rb,0x73c,rc)
126 # define CVTQS_SUIM(rb,rc) F_P(0x16,_R31_REGNO,rb,0x77c,rc)
127 # define CVTQS_SUID(rb,rc) F_P(0x16,_R31_REGNO,rb,0x7fc,rc)
128 # define CVTQT(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0be,rc)
129 # define CVTQT_C(rb,rc) F_P(0x16,_R31_REGNO,rb,0x03e,rc)
130 # define CVTQT_M(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0te,rc)
131 # define CVTQT_D(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0fe,rc)
132 # define CVTQT_SUI(rb,rc) F_P(0x16,_R31_REGNO,rb,0x7be,rc)
133 # define CVTQT_SUIC(rb,rc) F_P(0x16,_R31_REGNO,rb,0x73e,rc)
134 # define CVTQT_SUIM(rb,rc) F_P(0x16,_R31_REGNO,rb,0x77e,rc)
135 # define CVTQT_SUID(rb,rc) F_P(0x16,_R31_REGNO,rb,0x7fe,rc)
136 # define CVTST(rb,rc) F_P(0x16,_R31_REGNO,rb,0x2ac,rc)
137 # define CVTST_S(rb,rc) F_P(0x16,_R31_REGNO,rb,0x6ac,rc)
138 # define CVTTQ(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0af,rc)
139 # define CVTTQ_C(rb,rc) F_P(0x16,_R31_REGNO,rb,0x02f,rc)
140 # define CVTTQ_V(rb,rc) F_P(0x16,_R31_REGNO,rb,0x1af,rc)
141 # define CVTTQ_VC(rb,rc) F_P(0x16,_R31_REGNO,rb,0x12f,rc)
142 # define CVTTQ_SV(rb,rc) F_P(0x16,_R31_REGNO,rb,0x5af,rc)
143 # define CVTTQ_SVC(rb,rc) F_P(0x16,_R31_REGNO,rb,0x52f,rc)
144 # define CVTTQ_SVI(rb,rc) F_P(0x16,_R31_REGNO,rb,0x7af,rc)
145 # define CVTTQ_SVIC(rb,rc) F_P(0x16,_R31_REGNO,rb,0x72f,rc)
146 # define CVTTQ_D(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0ef,rc)
147 # define CVTTQ_VD(rb,rc) F_P(0x16,_R31_REGNO,rb,0x1ef,rc)
148 # define CVTTQ_SVD(rb,rc) F_P(0x16,_R31_REGNO,rb,0x5ef,rc)
149 # define CVTTQ_SVID(rb,rc) F_P(0x16,_R31_REGNO,rb,0x7ef,rc)
150 # define CVTTQ_M(rb,rc) F_P(0x16,_R31_REGNO,rb,0x06f,rc)
151 # define CVTTQ_VM(rb,rc) F_P(0x16,_R31_REGNO,rb,0x16f,rc)
152 # define CVTTQ_SVM(rb,rc) F_P(0x16,_R31_REGNO,rb,0x56f,rc)
153 # define CVTTQ_SVIM(rb,rc) F_P(0x16,_R31_REGNO,rb,0x76f,rc)
154 # define CVTTS(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0ac,rc)
155 # define CVTTS_C(rb,rc) F_P(0x16,_R31_REGNO,rb,0x02c,rc)
156 # define CVTTS_M(rb,rc) F_P(0x16,_R31_REGNO,rb,0x06c,rc)
157 # define CVTTS_D(rb,rc) F_P(0x16,_R31_REGNO,rb,0x0ec,rc)
158 # define CVTTS_U(rb,rc) F_P(0x16,_R31_REGNO,rb,0x1ac,rc)
159 # define CVTTS_UC(rb,rc) F_P(0x16,_R31_REGNO,rb,0x12c,rc)
160 # define CVTTS_UM(rb,rc) F_P(0x16,_R31_REGNO,rb,0x16c,rc)
161 # define CVTTS_UD(rb,rc) F_P(0x16,_R31_REGNO,rb,0x1ec,rc)
162 # define FBEQ(ra,d) Bra(0x31,ra,d)
163 # define FBGE(ra,d) Bra(0x36,ra,d)
164 # define FBGT(ra,d) Bra(0x37,ra,d)
165 # define FBLE(ra,d) Bra(0x33,ra,d)
166 # define FBLT(ra,d) Bra(0x32,ra,d)
167 # define FBNE(ra,d) Bra(0x35,ra,d)
168 # define FCMOVEQ(ra,rb,rc) F_P(0x17,ra,rb,0x02a,rc)
169 # define FCMOVGE(ra,rb,rc) F_P(0x17,ra,rb,0x02d,rc)
170 # define FCMOVGT(ra,rb,rc) F_P(0x17,ra,rb,0x02f,rc)
171 # define FCMOVLE(ra,rb,rc) F_P(0x17,ra,rb,0x02e,rc)
172 # define FCMOVLT(ra,rb,rc) F_P(0x17,ra,rb,0x02c,rc)
173 # define FCMOVNE(ra,rb,rc) F_P(0x17,ra,rb,0x02b,rc)
174 # define FTOIS(ra,rc) F_P(0x1c,ra,_R31_REGNO,0x078,rc)
175 # define FTOIT(ra,rc) F_P(0x1c,ra,_R31_REGNO,0x070,rc)
176 # define ITOFF(ra,rc) F_P(0x14,ra,_R31_REGNO,0x014,rc)
177 # define ITOFS(ra,rc) F_P(0x14,ra,_R31_REGNO,0x004,rc)
178 # define ITOFT(ra,rc) F_P(0x14,ra,_R31_REGNO,0x024,rc)
179 # define LDF(ra,rb,d) Mem(0x20,ra,rb,d)
180 # define LDG(ra,rb,d) Mem(0x21,ra,rb,d)
181 # define LDS(ra,rb,d) Mem(0x22,ra,rb,d)
182 # define LDT(ra,rb,d) Mem(0x23,ra,rb,d)
183 # define MF_FPCR(ra) F_P(0x17,ra,ra,0x025,ra)
184 # define MT_FPCR(ra) F_P(0x17,ra,ra,0x024,ra)
185 # define MULF(ra,rb,rc) F_P(0x15,ra,rb,0x082,rc)
186 # define MULG(ra,rb,rc) F_P(0x15,ra,rb,0x0a2,rc)
187 # define MULS(ra,rb,rc) F_P(0x16,ra,rb,0x082,rc)
188 # define MULS_C(ra,rb,rc) F_P(0x16,ra,rb,0x002,rc)
189 # define MULS_M(ra,rb,rc) F_P(0x16,ra,rb,0x042,rc)
190 # define MULS_D(ra,rb,rc) F_P(0x16,ra,rb,0x0c2,rc)
191 # define MULS_U(ra,rb,rc) F_P(0x16,ra,rb,0x182,rc)
192 # define MULS_UC(ra,rb,rc) F_P(0x16,ra,rb,0x102,rc)
193 # define MULS_UM(ra,rb,rc) F_P(0x16,ra,rb,0x142,rc)
194 # define MULS_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1c2,rc)
195 # define MULS_SU(ra,rb,rc) F_P(0x16,ra,rb,0x582,rc)
196 # define MULS_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x502,rc)
197 # define MULS_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x642,rc)
198 # define MULS_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5c2,rc)
199 # define MULS_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x782,rc)
200 # define MULS_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x702,rc)
201 # define MULS_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x742,rc)
202 # define MULS_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7c2,rc)
203 # define MULT(ra,rb,rc) F_P(0x16,ra,rb,0x0a2,rc)
204 # define MULT_C(ra,rb,rc) F_P(0x16,ra,rb,0x022,rc)
205 # define MULT_M(ra,rb,rc) F_P(0x16,ra,rb,0x062,rc)
206 # define MULT_D(ra,rb,rc) F_P(0x16,ra,rb,0x0e2,rc)
207 # define MULT_U(ra,rb,rc) F_P(0x16,ra,rb,0x1a2,rc)
208 # define MULT_UC(ra,rb,rc) F_P(0x16,ra,rb,0x122,rc)
209 # define MULT_UM(ra,rb,rc) F_P(0x16,ra,rb,0x162,rc)
210 # define MULT_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1e2,rc)
211 # define MULT_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a2,rc)
212 # define MULT_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x522,rc)
213 # define MULT_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x562,rc)
214 # define MULT_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5e2,rc)
215 # define MULT_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x7a2,rc)
216 # define MULT_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x722,rc)
217 # define MULT_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x762,rc)
218 # define MULT_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7e2,rc)
219 # define SQRTF(rb,rc) F_P(0x14,_R31_REGNO,rb,0x08a,rc)
220 # define SQRTG(rb,rc) F_P(0x14,_R31_REGNO,rb,0x0aa,rc)
221 # define SQRTS(rb,rc) F_P(0x14,_R31_REGNO,rb,0x08b,rc)
222 # define SQRTS_C(rb,rc) F_P(0x14,_R31_REGNO,rb,0x00b,rc)
223 # define SQRTS_M(rb,rc) F_P(0x14,_R31_REGNO,rb,0x04b,rc)
224 # define SQRTS_D(rb,rc) F_P(0x14,_R31_REGNO,rb,0x0cb,rc)
225 # define SQRTS_U(rb,rc) F_P(0x14,_R31_REGNO,rb,0x18b,rc)
226 # define SQRTS_UC(rb,rc) F_P(0x14,_R31_REGNO,rb,0x10b,rc)
227 # define SQRTS_UM(rb,rc) F_P(0x14,_R31_REGNO,rb,0x14b,rc)
228 # define SQRTS_UD(rb,rc) F_P(0x14,_R31_REGNO,rb,0x1cb,rc)
229 # define SQRTS_SU(rb,rc) F_P(0x14,_R31_REGNO,rb,0x58b,rc)
230 # define SQRTS_SUC(rb,rc) F_P(0x14,_R31_REGNO,rb,0x50b,rc)
231 # define SQRTS_SUM(rb,rc) F_P(0x14,_R31_REGNO,rb,0x54b,rc)
232 # define SQRTS_SUD(rb,rc) F_P(0x14,_R31_REGNO,rb,0x5cb,rc)
233 # define SQRTS_SUI(rb,rc) F_P(0x14,_R31_REGNO,rb,0x78b,rc)
234 # define SQRTS_SUIC(rb,rc) F_P(0x14,_R31_REGNO,rb,0x70b,rc)
235 # define SQRTS_SUIM(rb,rc) F_P(0x14,_R31_REGNO,rb,0x74b,rc)
236 # define SQRTS_SUID(rb,rc) F_P(0x14,_R31_REGNO,rb,0x7cb,rc)
237 # define SQRTT(rb,rc) F_P(0x14,_R31_REGNO,rb,0x0ab,rc)
238 # define SQRTT_C(rb,rc) F_P(0x14,_R31_REGNO,rb,0x02b,rc)
239 # define SQRTT_M(rb,rc) F_P(0x14,_R31_REGNO,rb,0x06b,rc)
240 # define SQRTT_D(rb,rc) F_P(0x14,_R31_REGNO,rb,0x0eb,rc)
241 # define SQRTT_U(rb,rc) F_P(0x14,_R31_REGNO,rb,0x1ab,rc)
242 # define SQRTT_UC(rb,rc) F_P(0x14,_R31_REGNO,rb,0x12b,rc)
243 # define SQRTT_UM(rb,rc) F_P(0x14,_R31_REGNO,rb,0x16b,rc)
244 # define SQRTT_UD(rb,rc) F_P(0x14,_R31_REGNO,rb,0x1eb,rc)
245 # define SQRTT_SU(rb,rc) F_P(0x14,_R31_REGNO,rb,0x5ab,rc)
246 # define SQRTT_SUC(rb,rc) F_P(0x14,_R31_REGNO,rb,0x52b,rc)
247 # define SQRTT_SUM(rb,rc) F_P(0x14,_R31_REGNO,rb,0x56b,rc)
248 # define SQRTT_SUD(rb,rc) F_P(0x14,_R31_REGNO,rb,0x5eb,rc)
249 # define SQRTT_SUI(rb,rc) F_P(0x14,_R31_REGNO,rb,0x7ab,rc)
250 # define SQRTT_SUIC(rb,rc) F_P(0x14,_R31_REGNO,rb,0x72b,rc)
251 # define SQRTT_SUIM(rb,rc) F_P(0x14,_R31_REGNO,rb,0x76b,rc)
252 # define SQRTT_SUID(rb,rc) F_P(0x14,_R31_REGNO,rb,0x7eb,rc)
253 # define STF(ra,rb,d) Mem(0x24,ra,rb,d)
254 # define STG(ra,rb,d) Mem(0x25,ra,rb,d)
255 # define STS(ra,rb,d) Mem(0x26,ra,rb,d)
256 # define STT(ra,rb,d) Mem(0x27,ra,rb,d)
257 # define SUBF(ra,rb,rc) F_P(0x15,ra,rb,0x081,rc)
258 # define SUBG(ra,rb,rc) F_P(0x15,ra,rb,0x0a1,rc)
259 # define SUBS(ra,rb,rc) F_P(0x16,ra,rb,0x081,rc)
260 # define SUBS_C(ra,rb,rc) F_P(0x16,ra,rb,0x001,rc)
261 # define SUBS_M(ra,rb,rc) F_P(0x16,ra,rb,0x041,rc)
262 # define SUBS_D(ra,rb,rc) F_P(0x16,ra,rb,0x0c1,rc)
263 # define SUBS_U(ra,rb,rc) F_P(0x16,ra,rb,0x181,rc)
264 # define SUBS_UC(ra,rb,rc) F_P(0x16,ra,rb,0x101,rc)
265 # define SUBS_UM(ra,rb,rc) F_P(0x16,ra,rb,0x141,rc)
266 # define SUBS_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1c1,rc)
267 # define SUBS_SU(ra,rb,rc) F_P(0x16,ra,rb,0x581,rc)
268 # define SUBS_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x501,rc)
269 # define SUBS_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x541,rc)
270 # define SUBS_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5c1,rc)
271 # define SUBS_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x781,rc)
272 # define SUBS_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x701,rc)
273 # define SUBS_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x741,rc)
274 # define SUBS_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7c1,rc)
275 # define SUBT(ra,rb,rc) F_P(0x16,ra,rb,0x0a1,rc)
276 # define SUBT_C(ra,rb,rc) F_P(0x16,ra,rb,0x021,rc)
277 # define SUBT_M(ra,rb,rc) F_P(0x16,ra,rb,0x061,rc)
278 # define SUBT_D(ra,rb,rc) F_P(0x16,ra,rb,0x0e1,rc)
279 # define SUBT_U(ra,rb,rc) F_P(0x16,ra,rb,0x1a1,rc)
280 # define SUBT_UC(ra,rb,rc) F_P(0x16,ra,rb,0x121,rc)
281 # define SUBT_UM(ra,rb,rc) F_P(0x16,ra,rb,0x161,rc)
282 # define SUBT_UD(ra,rb,rc) F_P(0x16,ra,rb,0x1e1,rc)
283 # define SUBT_SU(ra,rb,rc) F_P(0x16,ra,rb,0x5a1,rc)
284 # define SUBT_SUC(ra,rb,rc) F_P(0x16,ra,rb,0x521,rc)
285 # define SUBT_SUM(ra,rb,rc) F_P(0x16,ra,rb,0x561,rc)
286 # define SUBT_SUD(ra,rb,rc) F_P(0x16,ra,rb,0x5e1,rc)
287 # define SUBT_SUI(ra,rb,rc) F_P(0x16,ra,rb,0x7a1,rc)
288 # define SUBT_SUIC(ra,rb,rc) F_P(0x16,ra,rb,0x721,rc)
289 # define SUBT_SUIM(ra,rb,rc) F_P(0x16,ra,rb,0x761,rc)
290 # define SUBT_SUID(ra,rb,rc) F_P(0x16,ra,rb,0x7e1,rc)
291 # define FABS(ra,rc) CPYS(_R31_REGNO,ra,rc)
292 # define FMOV(ra,rc) CPYS(ra,ra,rc)
293 # define NEGF(ra,rc) SUBF(_R31_REGNO,ra,rc)
294 # define NEGG(ra,rc) SUBG(_R31_REGNO,ra,rc)
295 # define NEGS(ra,rc) SUBS(_R31_REGNO,ra,rc)
296 # define NEGT(ra,rc) SUBT(_R31_REGNO,ra,rc)
297 # define FNEGF(ra,rc) CPYSN(ra,ra,rc)
298 # define FNEGG(ra,rc) CPYSN(ra,ra,rc)
299 # define FNEGS(ra,rc) CPYSN(ra,ra,rc)
300 # define FNEGT(ra,rc) CPYSN(ra,ra,rc)
301 # define movr_f(r0,r1) movr_d(r0,r1)
302 # define movr_d(r0,r1) _movr_d(_jit,r0,r1)
303 static void _movr_d(jit_state_t*,jit_int32_t,jit_int32_t);
304 # define movi_f(r0,i0) _movi_f(_jit,r0,i0)
305 static void _movi_f(jit_state_t*,jit_int32_t,jit_float32_t*);
306 # define movi_d(r0,i0) _movi_d(_jit,r0,i0)
307 static void _movi_d(jit_state_t*,jit_int32_t,jit_float64_t*);
308 # define absr_f(r0,r1) FABS(r1,r0)
309 # define absr_d(r0,r1) FABS(r1,r0)
310 # define negr_f(r0,r1) FNEGS(r1,r0)
311 # define negr_d(r0,r1) FNEGT(r1,r0)
312 # define sqrtr_f(r0,r1) _sqrtr_f(_jit,r0,r1)
313 static void _sqrtr_f(jit_state_t*,jit_int32_t,jit_int32_t);
314 # define sqrtr_d(r0,r1) _sqrtr_d(_jit,r0,r1)
315 static void _sqrtr_d(jit_state_t*,jit_int32_t,jit_int32_t);
316 # define extr_f_d(r0,r1) movr_d(r0,r1)
317 # define extr_d_f(r0,r1) movr_f(r0,r1)
318 # define truncr_f_i(r0,r1) truncr_d_i(r0,r1)
319 # define truncr_f_l(r0,r1) truncr_d_l(r0,r1)
320 # define truncr_d_i(r0,r1) truncr_d_l(r0,r1)
321 # define truncr_d_l(r0,r1) _truncr_d_l(_jit,r0,r1)
322 static void _truncr_d_l(jit_state_t*,jit_int32_t,jit_int32_t);
323 # define extr_f(r0,r1) _extr_f(_jit,r0,r1)
324 static void _extr_f(jit_state_t*,jit_int32_t,jit_int32_t);
325 # define extr_d(r0,r1) _extr_d(_jit,r0,r1)
326 static void _extr_d(jit_state_t*,jit_int32_t,jit_int32_t);
327 # define addr_f(r0,r1,r2) _addr_f(_jit,r0,r1,r2)
328 static void _addr_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
329 # define addi_f(r0,r1,i0) _addi_f(_jit,r0,r1,i0)
330 static void _addi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
331 # define addr_d(r0,r1,r2) _addr_d(_jit,r0,r1,r2)
332 static void _addr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
333 # define addi_d(r0,r1,i0) _addi_d(_jit,r0,r1,i0)
334 static void _addi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
335 # define subr_f(r0,r1,r2) _subr_f(_jit,r0,r1,r2)
336 static void _subr_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
337 # define subi_f(r0,r1,i0) _subi_f(_jit,r0,r1,i0)
338 static void _subi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
339 # define subr_d(r0,r1,r2) _subr_d(_jit,r0,r1,r2)
340 static void _subr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
341 # define subi_d(r0,r1,i0) _subi_d(_jit,r0,r1,i0)
342 static void _subi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
343 # define rsbr_f(r0, r1, r2) subr_f(r0, r2, r1)
344 # define rsbi_f(r0, r1, i0) _rsbi_f(_jit, r0, r1, i0)
345 static void _rsbi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
346 # define rsbr_d(r0, r1, r2) subr_d(r0, r2, r1)
347 # define rsbi_d(r0, r1, i0) _rsbi_d(_jit, r0, r1, i0)
348 static void _rsbi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
349 # define mulr_f(r0,r1,r2) _mulr_f(_jit,r0,r1,r2)
350 static void _mulr_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
351 # define muli_f(r0,r1,i0) _muli_f(_jit,r0,r1,i0)
352 static void _muli_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
353 # define mulr_d(r0,r1,r2) _mulr_d(_jit,r0,r1,r2)
354 static void _mulr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
355 # define muli_d(r0,r1,i0) _muli_d(_jit,r0,r1,i0)
356 static void _muli_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
357 # define divr_f(r0,r1,r2) _divr_f(_jit,r0,r1,r2)
358 static void _divr_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
359 # define divi_f(r0,r1,i0) _divi_f(_jit,r0,r1,i0)
360 static void _divi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
361 # define divr_d(r0,r1,r2) _divr_d(_jit,r0,r1,r2)
362 static void _divr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
363 # define divi_d(r0,r1,i0) _divi_d(_jit,r0,r1,i0)
364 static void _divi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
365 # define ltr_f(r0,r1,r2) ltr_d(r0,r1,r2)
366 # define ltr_d(r0,r1,r2) _ltr_d(_jit,r0,r1,r2)
367 static void _ltr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
368 # define lti_f(r0,r1,i0) _lti_f(_jit,r0,r1,i0)
369 static void _lti_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
370 # define lti_d(r0,r1,i0) _lti_d(_jit,r0,r1,i0)
371 static void _lti_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
372 # define ler_f(r0,r1,r2) ler_d(r0,r1,r2)
373 # define ler_d(r0,r1,r2) _ler_d(_jit,r0,r1,r2)
374 static void _ler_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
375 # define lei_f(r0,r1,i0) _lei_f(_jit,r0,r1,i0)
376 static void _lei_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
377 # define lei_d(r0,r1,i0) _lei_d(_jit,r0,r1,i0)
378 static void _lei_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
379 # define eqr_f(r0,r1,r2) eqr_d(r0,r1,r2)
380 # define eqr_d(r0,r1,r2) _eqr_d(_jit,r0,r1,r2)
381 static void _eqr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
382 # define eqi_f(r0,r1,i0) _eqi_f(_jit,r0,r1,i0)
383 static void _eqi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
384 # define eqi_d(r0,r1,i0) _eqi_d(_jit,r0,r1,i0)
385 static void _eqi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
386 # define ger_f(r0,r1,r2) ger_d(r0,r1,r2)
387 # define ger_d(r0,r1,r2) _ger_d(_jit,r0,r1,r2)
388 static void _ger_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
389 # define gei_f(r0,r1,i0) _gei_f(_jit,r0,r1,i0)
390 static void _gei_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
391 # define gei_d(r0,r1,i0) _gei_d(_jit,r0,r1,i0)
392 static void _gei_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
393 # define gtr_f(r0,r1,r2) gtr_d(r0,r1,r2)
394 # define gtr_d(r0,r1,r2) _gtr_d(_jit,r0,r1,r2)
395 static void _gtr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
396 # define gti_f(r0,r1,i0) _gti_f(_jit,r0,r1,i0)
397 static void _gti_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
398 # define gti_d(r0,r1,i0) _gti_d(_jit,r0,r1,i0)
399 static void _gti_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
400 # define ner_f(r0,r1,r2) ner_d(r0,r1,r2)
401 # define ner_d(r0,r1,r2) _ner_d(_jit,r0,r1,r2)
402 static void _ner_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
403 # define nei_f(r0,r1,i0) _nei_f(_jit,r0,r1,i0)
404 static void _nei_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
405 # define nei_d(r0,r1,i0) _nei_d(_jit,r0,r1,i0)
406 static void _nei_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
407 # define unltr_f(r0,r1,r2) unltr_d(r0,r1,r2)
408 # define unltr_d(r0,r1,r2) _unltr_d(_jit,r0,r1,r2)
409 static void _unltr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
410 # define unlti_f(r0,r1,i0) _unlti_f(_jit,r0,r1,i0)
411 static void _unlti_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
412 # define unlti_d(r0,r1,i0) _unlti_d(_jit,r0,r1,i0)
413 static void _unlti_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
414 # define unler_f(r0,r1,r2) unler_d(r0,r1,r2)
415 # define unler_d(r0,r1,r2) _unler_d(_jit,r0,r1,r2)
416 static void _unler_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
417 # define unlei_f(r0,r1,i0) _unlei_f(_jit,r0,r1,i0)
418 static void _unlei_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
419 # define unlei_d(r0,r1,i0) _unlei_d(_jit,r0,r1,i0)
420 static void _unlei_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
421 # define uneqr_f(r0,r1,r2) uneqr_d(r0,r1,r2)
422 # define uneqr_d(r0,r1,r2) _uneqr_d(_jit,r0,r1,r2)
423 static void _uneqr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
424 # define uneqi_f(r0,r1,i0) _uneqi_f(_jit,r0,r1,i0)
425 static void _uneqi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
426 # define uneqi_d(r0,r1,i0) _uneqi_d(_jit,r0,r1,i0)
427 static void _uneqi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
428 # define unger_f(r0,r1,r2) unger_d(r0,r1,r2)
429 # define unger_d(r0,r1,r2) _unger_d(_jit,r0,r1,r2)
430 static void _unger_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
431 # define ungei_f(r0,r1,i0) _ungei_f(_jit,r0,r1,i0)
432 static void _ungei_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
433 # define ungei_d(r0,r1,i0) _ungei_d(_jit,r0,r1,i0)
434 static void _ungei_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
435 # define ungtr_f(r0,r1,r2) ungtr_d(r0,r1,r2)
436 # define ungtr_d(r0,r1,r2) _ungtr_d(_jit,r0,r1,r2)
437 static void _ungtr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
438 # define ungti_f(r0,r1,i0) _ungti_f(_jit,r0,r1,i0)
439 static void _ungti_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
440 # define ungti_d(r0,r1,i0) _ungti_d(_jit,r0,r1,i0)
441 static void _ungti_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
442 # define ltgtr_f(r0,r1,r2) ltgtr_d(r0,r1,r2)
443 # define ltgtr_d(r0,r1,r2) _ltgtr_d(_jit,r0,r1,r2)
444 static void _ltgtr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
445 # define ltgti_f(r0,r1,i0) _ltgti_f(_jit,r0,r1,i0)
446 static void _ltgti_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
447 # define ltgti_d(r0,r1,i0) _ltgti_d(_jit,r0,r1,i0)
448 static void _ltgti_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
449 # define ordr_f(r0,r1,r2) ordr_d(r0,r1,r2)
450 # define ordr_d(r0,r1,r2) _ordr_d(_jit,r0,r1,r2)
451 static void _ordr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
452 # define ordi_f(r0,r1,i0) _ordi_f(_jit,r0,r1,i0)
453 static void _ordi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
454 # define ordi_d(r0,r1,i0) _ordi_d(_jit,r0,r1,i0)
455 static void _ordi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
456 # define unordr_f(r0,r1,r2) unordr_d(r0,r1,r2)
457 # define unordr_d(r0,r1,r2) _unordr_d(_jit,r0,r1,r2)
458 static void _unordr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
459 # define unordi_f(r0,r1,i0) _unordi_f(_jit,r0,r1,i0)
460 static void _unordi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_float32_t*);
461 # define unordi_d(r0,r1,i0) _unordi_d(_jit,r0,r1,i0)
462 static void _unordi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_float64_t*);
463 # define bltr_f(i0,r0,r1) bltr_d(i0,r0,r1)
464 # define bltr_d(i0,r0,r1) _bltr_d(_jit,i0,r0,r1)
465 static jit_word_t _bltr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
466 # define blti_f(i0,r0,i1) _blti_f(_jit,i0,r0,i1)
467 static jit_word_t _blti_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
468 # define blti_d(i0,r0,i1) _blti_d(_jit,i0,r0,i1)
469 static jit_word_t _blti_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
470 # define bler_f(i0,r0,r1) bler_d(i0,r0,r1)
471 # define bler_d(i0,r0,r1) _bler_d(_jit,i0,r0,r1)
472 static jit_word_t _bler_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
473 # define blei_f(i0,r0,i1) _blei_f(_jit,i0,r0,i1)
474 static jit_word_t _blei_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
475 # define blei_d(i0,r0,i1) _blei_d(_jit,i0,r0,i1)
476 static jit_word_t _blei_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
477 # define beqr_f(i0,r0,r1) beqr_d(i0,r0,r1)
478 # define beqr_d(i0,r0,r1) _beqr_d(_jit,i0,r0,r1)
479 static jit_word_t _beqr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
480 # define beqi_f(i0,r0,i1) _beqi_f(_jit,i0,r0,i1)
481 static jit_word_t _beqi_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
482 # define beqi_d(i0,r0,i1) _beqi_d(_jit,i0,r0,i1)
483 static jit_word_t _beqi_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
484 # define bger_f(i0,r0,r1) bger_d(i0,r0,r1)
485 # define bger_d(i0,r0,r1) _bger_d(_jit,i0,r0,r1)
486 static jit_word_t _bger_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
487 # define bgei_f(i0,r0,i1) _bgei_f(_jit,i0,r0,i1)
488 static jit_word_t _bgei_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
489 # define bgei_d(i0,r0,i1) _bgei_d(_jit,i0,r0,i1)
490 static jit_word_t _bgei_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
491 # define bgtr_f(i0,r0,r1) bgtr_d(i0,r0,r1)
492 # define bgtr_d(i0,r0,r1) _bgtr_d(_jit,i0,r0,r1)
493 static jit_word_t _bgtr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
494 # define bgti_f(i0,r0,i1) _bgti_f(_jit,i0,r0,i1)
495 static jit_word_t _bgti_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
496 # define bgti_d(i0,r0,i1) _bgti_d(_jit,i0,r0,i1)
497 static jit_word_t _bgti_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
498 # define bner_f(i0,r0,r1) bner_d(i0,r0,r1)
499 # define bner_d(i0,r0,r1) _bner_d(_jit,i0,r0,r1)
500 static jit_word_t _bner_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
501 # define bnei_f(i0,r0,i1) _bnei_f(_jit,i0,r0,i1)
502 static jit_word_t _bnei_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
503 # define bnei_d(i0,r0,i1) _bnei_d(_jit,i0,r0,i1)
504 static jit_word_t _bnei_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
505 # define bunltr_f(i0,r0,r1) bunltr_d(i0,r0,r1)
506 # define bunltr_d(i0,r0,r1) _bunltr_d(_jit,i0,r0,r1)
507 static jit_word_t _bunltr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
508 # define bunlti_f(i0,r0,i1) _bunlti_f(_jit,i0,r0,i1)
509 static jit_word_t _bunlti_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
510 # define bunlti_d(i0,r0,i1) _bunlti_d(_jit,i0,r0,i1)
511 static jit_word_t _bunlti_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
512 # define bunler_f(i0,r0,r1) bunler_d(i0,r0,r1)
513 # define bunler_d(i0,r0,r1) _bunler_d(_jit,i0,r0,r1)
514 static jit_word_t _bunler_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
515 # define bunlei_f(i0,r0,i1) _bunlei_f(_jit,i0,r0,i1)
516 static jit_word_t _bunlei_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
517 # define bunlei_d(i0,r0,i1) _bunlei_d(_jit,i0,r0,i1)
518 static jit_word_t _bunlei_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
519 # define buneqr_f(i0,r0,r1) buneqr_d(i0,r0,r1)
520 # define buneqr_d(i0,r0,r1) _buneqr_d(_jit,i0,r0,r1)
521 static jit_word_t _buneqr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
522 # define buneqi_f(i0,r0,i1) _buneqi_f(_jit,i0,r0,i1)
523 static jit_word_t _buneqi_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
524 # define buneqi_d(i0,r0,i1) _buneqi_d(_jit,i0,r0,i1)
525 static jit_word_t _buneqi_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
526 # define bunger_f(i0,r0,r1) bunger_d(i0,r0,r1)
527 # define bunger_d(i0,r0,r1) _bunger_d(_jit,i0,r0,r1)
528 static jit_word_t _bunger_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
529 # define bungei_f(i0,r0,i1) _bungei_f(_jit,i0,r0,i1)
530 static jit_word_t _bungei_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
531 # define bungei_d(i0,r0,i1) _bungei_d(_jit,i0,r0,i1)
532 static jit_word_t _bungei_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
533 # define bungtr_f(i0,r0,r1) bungtr_d(i0,r0,r1)
534 # define bungtr_d(i0,r0,r1) _bungtr_d(_jit,i0,r0,r1)
535 static jit_word_t _bungtr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
536 # define bungti_f(i0,r0,i1) _bungti_f(_jit,i0,r0,i1)
537 static jit_word_t _bungti_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
538 # define bungti_d(i0,r0,i1) _bungti_d(_jit,i0,r0,i1)
539 static jit_word_t _bungti_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
540 # define bltgtr_f(i0,r0,r1) bltgtr_d(i0,r0,r1)
541 # define bltgtr_d(i0,r0,r1) _bltgtr_d(_jit,i0,r0,r1)
542 static jit_word_t _bltgtr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
543 # define bltgti_f(i0,r0,i1) _bltgti_f(_jit,i0,r0,i1)
544 static jit_word_t _bltgti_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
545 # define bltgti_d(i0,r0,i1) _bltgti_d(_jit,i0,r0,i1)
546 static jit_word_t _bltgti_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
547 # define bordr_f(i0,r0,r1) bordr_d(i0,r0,r1)
548 # define bordr_d(i0,r0,r1) _bordr_d(_jit,i0,r0,r1)
549 static jit_word_t _bordr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
550 # define bordi_f(i0,r0,i1) _bordi_f(_jit,i0,r0,i1)
551 static jit_word_t _bordi_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
552 # define bordi_d(i0,r0,i1) _bordi_d(_jit,i0,r0,i1)
553 static jit_word_t _bordi_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
554 # define bunordr_f(i0,r0,r1) bunordr_d(i0,r0,r1)
555 # define bunordr_d(i0,r0,r1) _bunordr_d(_jit,i0,r0,r1)
556 static jit_word_t _bunordr_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
557 # define bunordi_f(i0,r0,i1) _bunordi_f(_jit,i0,r0,i1)
558 static jit_word_t _bunordi_f(jit_state_t*,jit_word_t,jit_int32_t,jit_float32_t*);
559 # define bunordi_d(i0,r0,i1) _bunordi_d(_jit,i0,r0,i1)
560 static jit_word_t _bunordi_d(jit_state_t*,jit_word_t,jit_int32_t,jit_float64_t*);
561 # define ldr_f(r0,r1) LDS(r0,r1,0)
562 # define ldi_f(r0,i0) _ldi_f(_jit,r0,i0)
563 static void _ldi_f(jit_state_t*,jit_int32_t,jit_word_t);
564 # define ldr_d(r0,r1) LDT(r0,r1,0)
565 # define ldi_d(r0,i0) _ldi_d(_jit,r0,i0)
566 static void _ldi_d(jit_state_t*,jit_int32_t,jit_word_t);
567 # define ldxr_f(r0,r1,r2) _ldxr_f(_jit,r0,r1,r2)
568 static void _ldxr_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
569 # define ldxi_f(r0,r1,i0) _ldxi_f(_jit,r0,r1,i0)
570 static void _ldxi_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_word_t);
571 # define ldxr_d(r0,r1,r2) _ldxr_d(_jit,r0,r1,r2)
572 static void _ldxr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
573 # define ldxi_d(r0,r1,i0) _ldxi_d(_jit,r0,r1,i0)
574 static void _ldxi_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_word_t);
575 # define str_f(r0,r1) STS(r1,r0,0)
576 # define sti_f(i0,r0) _sti_f(_jit,i0,r0)
577 static void _sti_f(jit_state_t*,jit_word_t,jit_int32_t);
578 # define str_d(r0,r1) STT(r1,r0,0)
579 # define sti_d(i0,r0) _sti_d(_jit,i0,r0)
580 static void _sti_d(jit_state_t*,jit_word_t,jit_int32_t);
581 # define stxr_f(r0,r1,r2) _stxr_f(_jit,r0,r1,r2)
582 static void _stxr_f(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
583 # define stxi_f(i0,r0,r1) _stxi_f(_jit,i0,r0,r1)
584 static void _stxi_f(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
585 # define stxr_d(r0,r1,r2) _stxr_d(_jit,r0,r1,r2)
586 static void _stxr_d(jit_state_t*,jit_int32_t,jit_int32_t,jit_int32_t);
587 # define stxi_d(i0,r0,r1) _stxi_d(_jit,i0,r0,r1)
588 static void _stxi_d(jit_state_t*,jit_word_t,jit_int32_t,jit_int32_t);
589 # define vaarg_d(r0, r1) _vaarg_d(_jit, r0, r1)
590 static void _vaarg_d(jit_state_t*, jit_int32_t, jit_int32_t);
594 # define fpr_opi(name, type, size) \
596 _##name##i_##type(jit_state_t *_jit, \
597 jit_int32_t r0, jit_int32_t r1, \
598 jit_float##size##_t *i0) \
600 jit_int32_t reg = jit_get_reg(jit_class_fpr); \
601 movi_##type(rn(reg), i0); \
602 name##r_##type(r0, r1, rn(reg)); \
603 jit_unget_reg(reg); \
605 # define fpr_bopi(name, type, size) \
607 _b##name##i_##type(jit_state_t *_jit, \
608 jit_word_t i0, jit_int32_t r0, \
609 jit_float##size##_t *i1) \
612 jit_int32_t reg = jit_get_reg(jit_class_fpr|jit_class_nospill);\
613 movi_##type(rn(reg), i1); \
614 word = b##name##r_##type(i0, r0, rn(reg)); \
615 jit_unget_reg(reg); \
618 # define fopi(name) fpr_opi(name, f, 32)
619 # define fbopi(name) fpr_bopi(name, f, 32)
620 # define dopi(name) fpr_opi(name, d, 64)
621 # define dbopi(name) fpr_bopi(name, d, 64)
624 _movr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
631 _movi_f(jit_state_t *_jit, jit_int32_t r0, jit_float32_t *i0)
639 if (_jitc->no_data) {
641 reg = jit_get_reg(jit_class_gpr);
642 movi(rn(reg), data.i & 0xffffffff);
643 stxi_i(-8, _FP_REGNO, rn(reg));
645 ldxi_f(r0, _FP_REGNO, -8);
648 ldi_f(r0, (jit_word_t)i0);
652 _movi_d(jit_state_t *_jit, jit_int32_t r0, jit_float64_t *i0)
660 if (_jitc->no_data) {
662 reg = jit_get_reg(jit_class_gpr);
663 movi(rn(reg), data.w);
664 stxi_l(-8, _FP_REGNO, rn(reg));
666 ldxi_d(r0, _FP_REGNO, -8);
669 ldi_d(r0, (jit_word_t)i0);
673 _truncr_d_l(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
676 reg = jit_get_reg(jit_class_fpr);
677 CVTTQ_SVC(r1, rn(reg));
679 stxi_d(-8, _FP_REGNO, rn(reg));
680 ldxi(r0, _FP_REGNO, -8);
685 _sqrtr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
692 _sqrtr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
699 _extr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
701 stxi_l(-8, _FP_REGNO, r1);
702 ldxi_d(r0, _FP_REGNO, -8);
707 _extr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
709 stxi_l(-8, _FP_REGNO, r1);
710 ldxi_d(r0, _FP_REGNO, -8);
715 _addr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
723 _addr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
731 _subr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
740 _subr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
749 _mulr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
757 _mulr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
765 _divr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
773 _divr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
781 _ltr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
785 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
787 CMPTUN_SU(r1, r2, rn(reg));
791 CMPTLT_SU(r1, r2, rn(reg));
796 patch_at(v, _jit->pc.w);
797 patch_at(w, _jit->pc.w);
804 _ler_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
808 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
810 CMPTUN_SU(r1, r2, rn(reg));
814 CMPTLE_SU(r1, r2, rn(reg));
819 patch_at(v, _jit->pc.w);
820 patch_at(w, _jit->pc.w);
827 _eqr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
831 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
833 CMPTUN_SU(r1, r2, rn(reg));
837 CMPTEQ_SU(r1, r2, rn(reg));
842 patch_at(v, _jit->pc.w);
843 patch_at(w, _jit->pc.w);
850 _ger_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
854 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
856 CMPTUN_SU(r1, r2, rn(reg));
860 CMPTLT_SU(r1, r2, rn(reg));
865 patch_at(v, _jit->pc.w);
866 patch_at(w, _jit->pc.w);
873 _gtr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
877 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
879 CMPTUN_SU(r1, r2, rn(reg));
883 CMPTLE_SU(r1, r2, rn(reg));
888 patch_at(v, _jit->pc.w);
889 patch_at(w, _jit->pc.w);
896 _ner_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
900 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
902 CMPTUN_SU(r1, r2, rn(reg));
906 CMPTEQ_SU(r1, r2, rn(reg));
911 patch_at(v, _jit->pc.w);
912 patch_at(w, _jit->pc.w);
919 _unltr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
923 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
925 CMPTUN_SU(r1, r2, rn(reg));
929 CMPTLT_SU(r1, r2, rn(reg));
934 patch_at(v, _jit->pc.w);
935 patch_at(w, _jit->pc.w);
942 _unler_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
946 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
948 CMPTUN_SU(r1, r2, rn(reg));
952 CMPTLE_SU(r1, r2, rn(reg));
957 patch_at(v, _jit->pc.w);
958 patch_at(w, _jit->pc.w);
965 _uneqr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
969 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
971 CMPTUN_SU(r1, r2, rn(reg));
975 CMPTEQ_SU(r1, r2, rn(reg));
980 patch_at(v, _jit->pc.w);
981 patch_at(w, _jit->pc.w);
988 _unger_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
992 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
994 CMPTUN_SU(r1, r2, rn(reg));
998 CMPTLT_SU(r1, r2, rn(reg));
1003 patch_at(v, _jit->pc.w);
1004 patch_at(w, _jit->pc.w);
1011 _ungtr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1015 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1017 CMPTUN_SU(r1, r2, rn(reg));
1021 CMPTLE_SU(r1, r2, rn(reg));
1026 patch_at(v, _jit->pc.w);
1027 patch_at(w, _jit->pc.w);
1034 _ltgtr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1038 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1040 CMPTUN_SU(r1, r2, rn(reg));
1044 CMPTEQ_SU(r1, r2, rn(reg));
1049 patch_at(v, _jit->pc.w);
1050 patch_at(w, _jit->pc.w);
1057 _ordr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1061 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1063 CMPTUN_SU(r1, r2, rn(reg));
1068 patch_at(w, _jit->pc.w);
1075 _unordr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1079 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1081 CMPTUN_SU(r1, r2, rn(reg));
1087 patch_at(w, _jit->pc.w);
1093 _bltr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1097 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1098 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1102 CMPTLT_SU(r0, r1, rn(reg)); /* lt satisfy condition */
1105 FBNE(rn(reg), ((i0 - w) >> 2) - 1);
1106 patch_at(v, _jit->pc.w);
1114 _bler_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1118 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1119 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1123 CMPTLE_SU(r0, r1, rn(reg)); /* le satisfy condition */
1126 FBNE(rn(reg), ((i0 - w) >> 2) - 1);
1127 patch_at(v, _jit->pc.w);
1135 _beqr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1139 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1140 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1144 CMPTEQ_SU(r0, r1, rn(reg)); /* eq satisfy condition */
1147 FBNE(rn(reg), ((i0 - w) >> 2) - 1);
1148 patch_at(v, _jit->pc.w);
1156 _bger_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1160 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1161 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1165 CMPTLT_SU(r0, r1, rn(reg)); /* ge satisfy condition */
1168 FBEQ(rn(reg), ((i0 - w) >> 2) - 1);
1169 patch_at(v, _jit->pc.w);
1177 _bgtr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1181 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1182 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1186 CMPTLE_SU(r0, r1, rn(reg)); /* gt satisfy condition */
1189 FBEQ(rn(reg), ((i0 - w) >> 2) - 1);
1190 patch_at(v, _jit->pc.w);
1198 _bner_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1202 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1203 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1207 CMPTEQ_SU(r0, r1, rn(reg)); /* ne satisfy condition */
1211 patch_at(u, _jit->pc.w);
1213 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1214 patch_at(v, _jit->pc.w);
1222 _bunltr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1226 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1227 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1231 CMPTLT_SU(r0, r1, rn(reg)); /* lt satisfy condition */
1236 patch_at(u, _jit->pc.w);
1237 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1238 patch_at(v, _jit->pc.w);
1246 _bunler_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1250 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1251 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1255 CMPTLE_SU(r0, r1, rn(reg)); /* le satisfy condition */
1260 patch_at(u, _jit->pc.w);
1261 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1262 patch_at(v, _jit->pc.w);
1270 _buneqr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1274 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1275 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1279 CMPTEQ_SU(r0, r1, rn(reg)); /* eq satisfy condition */
1284 patch_at(u, _jit->pc.w);
1285 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1286 patch_at(v, _jit->pc.w);
1294 _bunger_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1298 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1299 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1303 CMPTLT_SU(r0, r1, rn(reg)); /* ge satisfy condition */
1308 patch_at(u, _jit->pc.w);
1309 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1310 patch_at(v, _jit->pc.w);
1318 _bungtr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1322 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1323 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1327 CMPTLE_SU(r0, r1, rn(reg)); /* gt does satisfy condition */
1332 patch_at(u, _jit->pc.w);
1333 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1334 patch_at(v, _jit->pc.w);
1342 _bltgtr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1346 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1347 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1351 CMPTEQ_SU(r1, r0, rn(reg));
1353 v = _jit->pc.w; /* eq does not satisfy condition */
1356 BR(_R31_REGNO, ((i0 - w) >> 2) - 1);
1357 patch_at(u, _jit->pc.w);
1358 patch_at(v, _jit->pc.w);
1366 _bordr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1370 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1371 CMPTUN_SU(r0, r1, rn(reg)); /* unord does not satisfy condition */
1374 FBEQ(rn(reg), ((i0 - w) >> 2) - 1);
1382 _bunordr_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1386 reg = jit_get_reg(jit_class_fpr|jit_class_nospill);
1387 CMPTUN_SU(r0, r1, rn(reg)); /* unord satisfy condition */
1390 FBNE(rn(reg), ((i0 - w) >> 2) - 1);
1398 _ldi_f(jit_state_t *_jit, jit_int32_t r0, jit_word_t i0)
1402 LDS(r0, _R31_REGNO, _u16(i0));
1404 reg = jit_get_reg(jit_class_gpr);
1412 _ldi_d(jit_state_t *_jit, jit_int32_t r0, jit_word_t i0)
1416 LDT(r0, _R31_REGNO, _u16(i0));
1418 reg = jit_get_reg(jit_class_gpr);
1426 _ldxr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1429 reg = jit_get_reg(jit_class_gpr);
1430 addr(rn(reg), r1, r2);
1436 _ldxi_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_word_t i0)
1440 LDS(r0, r1, _u16(i0));
1442 reg = jit_get_reg(jit_class_gpr);
1443 addi(rn(reg), r1, i0);
1450 _ldxr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1453 reg = jit_get_reg(jit_class_gpr);
1454 addr(rn(reg), r1, r2);
1460 _ldxi_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_word_t i0)
1464 LDT(r0, r1, _u16(i0));
1466 reg = jit_get_reg(jit_class_gpr);
1467 addi(rn(reg), r1, i0);
1474 _sti_f(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0)
1478 STS(r0, _R31_REGNO, _u16(i0));
1480 reg = jit_get_reg(jit_class_gpr);
1488 _sti_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0)
1492 STT(r0, _R31_REGNO, _u16(i0));
1494 reg = jit_get_reg(jit_class_gpr);
1502 _stxr_f(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1505 reg = jit_get_reg(jit_class_gpr);
1506 addr(rn(reg), r0, r1);
1512 _stxi_f(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1516 STS(r1, r0, _u16(i0));
1518 reg = jit_get_reg(jit_class_gpr);
1519 addi(rn(reg), r0, i0);
1526 _stxr_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1, jit_int32_t r2)
1529 reg = jit_get_reg(jit_class_gpr);
1530 addr(rn(reg), r0, r1);
1536 _stxi_d(jit_state_t *_jit, jit_word_t i0, jit_int32_t r0, jit_int32_t r1)
1540 STT(r1, r0, _u16(i0));
1542 reg = jit_get_reg(jit_class_gpr);
1543 addi(rn(reg), r0, i0);
1550 _vaarg_d(jit_state_t *_jit, jit_int32_t r0, jit_int32_t r1)
1553 jit_int32_t rg0, rg1, rg2;
1555 assert(_jitc->function->self.call & jit_call_varargs);
1557 rg0 = jit_get_reg(jit_class_gpr);
1558 rg1 = jit_get_reg(jit_class_gpr);
1559 rg2 = jit_get_reg(jit_class_gpr);
1561 /* Load the base in first temporary. */
1562 ldxi(rn(rg0), r1, offsetof(jit_va_list_t, base));
1564 /* Load the offset in the second temporary. */
1565 ldxi(rn(rg1), r1, offsetof(jit_va_list_t, offset));
1567 /* Remember absolute offset */
1568 movr(rn(rg2), rn(rg1));
1570 /* Jump if overflowed register saved area. */
1571 ge_code = bgei(_jit->pc.w, rn(rg1), 48);
1572 /* Otherwise load from the float registers save area. */
1573 subi(rn(rg1), rn(rg1), 48);
1574 patch_at(ge_code, _jit->pc.w);
1576 /* Load the argument */
1577 ldxr_d(r0, rn(rg0), rn(rg1));
1579 /* No longer needed. */
1583 /* Update offset. */
1584 addi(rn(rg2), rn(rg2), 8);
1585 stxi(offsetof(jit_va_list_t, offset), r1, rn(rg2));