frontend: Fix colorspace conversion routines on big-endian
[pcsx_rearmed.git] / include / lightning / lightning.h
1 /*
2  * Copyright (C) 2012-2019  Free Software Foundation, Inc.
3  *
4  * This file is part of GNU lightning.
5  *
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)
9  * any later version.
10  *
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.
15  *
16  * Authors:
17  *      Paulo Cesar Pereira de Andrade
18  */
19
20 #ifndef _lightning_h
21 #define _lightning_h
22
23 #include <unistd.h>
24 #include <stdlib.h>
25 #include <stdint.h>
26 #include <string.h>
27
28 #if defined(__hpux) && defined(__hppa__)
29 #  include <machine/param.h>
30 #endif
31 #if defined(__alpha__) && defined(__osf__)
32 #  include <machine/endian.h>
33 #endif
34
35 #ifndef __WORDSIZE
36 #  if defined(WORDSIZE)                         /* ppc darwin */
37 #    define __WORDSIZE          WORDSIZE
38 #  elif defined(__SIZEOF_POINTER__)             /* ppc aix */
39 #    define __WORDSIZE          (__SIZEOF_POINTER__ << 3)
40 #  elif defined(_ILP32)                         /* hppa hp-ux */
41 #    define __WORDSIZE          32
42 #  elif defined(_LP64)                          /* ia64 hp-ux (with cc +DD64) */
43 #    define __WORDSIZE          64
44 #  elif defined(_MIPS_SZPTR)                    /* mips irix */
45 #    if _MIPS_SZPTR == 32
46 #      define __WORDSIZE        32
47 #    else
48 #      define __WORDSIZE        64
49 #    endif
50 #  else                                         /* From FreeBSD 9.1 stdint.h */
51 #    if defined(UINTPTR_MAX) && defined(UINT64_MAX) && \
52         (UINTPTR_MAX == UINT64_MAX)
53 #      define __WORDSIZE        64
54 #    else
55 #      define __WORDSIZE        32
56 #    endif
57 #  endif
58 #endif
59 #ifndef __LITTLE_ENDIAN
60 #  if defined(LITTLE_ENDIAN)                    /* ppc darwin */
61 #    define __LITTLE_ENDIAN     LITTLE_ENDIAN
62 #  elif defined(__ORDER_LITTLE_ENDIAN__)        /* ppc aix */
63 #    define __LITTLE_ENDIAN     __ORDER_LITTLE_ENDIAN__
64 #  else
65 #    define __LITTLE_ENDIAN     1234
66 #  endif
67 #endif
68 #ifndef __BIG_ENDIAN
69 #  if defined(BIG_ENDIAN)                       /* ppc darwin */
70 #    define __BIG_ENDIAN        BIG_ENDIAN
71 #  elif defined(__ORDER_BIG_ENDIAN__)           /* ppc aix */
72 #    define __BIG_ENDIAN        __ORDER_BIG_ENDIAN__
73 #  else
74 #    define __BIG_ENDIAN        4321
75 #  endif
76 #endif
77 #ifndef __BYTE_ORDER
78 #  if defined(BYTE_ORDER)                       /* ppc darwin */
79 #    define __BYTE_ORDER        BYTE_ORDER
80 #  elif defined(__BYTE_ORDER__)                 /* ppc aix */
81 #    define __BYTE_ORDER        __BYTE_ORDER__
82 #  elif defined(_BIG_ENDIAN)                    /* hppa hp-ux */
83 #    define __BYTE_ORDER        __BIG_ENDIAN
84 #  elif defined(__BIG_ENDIAN__)                 /* ia64 hp-ux */
85 #    define __BYTE_ORDER        __BIG_ENDIAN
86 #  elif defined(__i386__)                       /* 32 bit x86 solaris */
87 #    define __BYTE_ORDER        __LITTLE_ENDIAN
88 #  elif defined(__x86_64__)                     /* 64 bit x86 solaris */
89 #    define __BYTE_ORDER        __LITTLE_ENDIAN
90 #  elif defined(__MIPSEB)                       /* mips irix */
91 #    define __BYTE_ORDER        __BIG_ENDIAN
92 #  else
93 #    error cannot figure __BYTE_ORDER
94 #  endif
95 #endif
96
97 typedef signed char             jit_int8_t;
98 typedef unsigned char           jit_uint8_t;
99 typedef signed short            jit_int16_t;
100 typedef unsigned short          jit_uint16_t;
101 typedef signed int              jit_int32_t;
102 typedef unsigned int            jit_uint32_t;
103 #if __WORDSIZE == 32
104 typedef signed long long        jit_int64_t;
105 typedef unsigned long long      jit_uint64_t;
106 typedef jit_int32_t             jit_word_t;
107 typedef jit_uint32_t            jit_uword_t;
108 #elif (_WIN32 && !__CYGWIN__)
109 typedef signed long long        jit_int64_t;
110 typedef unsigned long long      jit_uint64_t;
111 typedef jit_int64_t             jit_word_t;
112 typedef jit_uint64_t            jit_uword_t;
113 #else
114 typedef signed long             jit_int64_t;
115 typedef unsigned long           jit_uint64_t;
116 typedef jit_int64_t             jit_word_t;
117 typedef jit_uint64_t            jit_uword_t;
118 #endif
119 typedef float                   jit_float32_t;
120 typedef double                  jit_float64_t;
121 typedef void*                   jit_pointer_t;
122 typedef jit_int32_t             jit_bool_t;
123 typedef jit_int32_t             jit_gpr_t;
124 typedef jit_int32_t             jit_fpr_t;
125
126 #if !defined(__powerpc__) && \
127         (defined(__POWERPC__) || defined(__ppc__) || defined(__PPC__))
128 #define __powerpc__ 1
129 #endif
130
131 #if defined(__i386__) || defined(__x86_64__)
132 #  include <lightning/jit_x86.h>
133 #elif defined(__mips__)
134 #  include <lightning/jit_mips.h>
135 #elif defined(__arm__)
136 #  include <lightning/jit_arm.h>
137 #elif defined(__powerpc__)
138 #  include <lightning/jit_ppc.h>
139 #elif defined(__sparc__)
140 #  include <lightning/jit_sparc.h>
141 #elif defined(__ia64__)
142 #  include <lightning/jit_ia64.h>
143 #elif defined(__hppa__)
144 #  include <lightning/jit_hppa.h>
145 #elif defined(__aarch64__)
146 #  include <lightning/jit_aarch64.h>
147 #elif defined(__s390__) || defined(__s390x__)
148 #  include <lightning/jit_s390.h>
149 #elif defined(__alpha__)
150 #  include <lightning/jit_alpha.h>
151 #elif defined(__riscv)
152 #  include <lightning/jit_riscv.h>
153 #endif
154
155 #define jit_flag_node           0x0001  /* patch node not absolute */
156 #define jit_flag_patch          0x0002  /* jump already patched */
157 #define jit_flag_data           0x0004  /* data in the constant pool */
158 #define jit_flag_use            0x0008  /* do not remove marker label */
159 #define jit_flag_synth          0x0010  /* synthesized instruction */
160 #define jit_flag_head           0x1000  /* label reached by normal flow */
161 #define jit_flag_varargs        0x2000  /* call{r,i} to varargs function */
162
163 #define JIT_R(index)            jit_r(index)
164 #define JIT_V(index)            jit_v(index)
165 #define JIT_F(index)            jit_f(index)
166 #define JIT_R_NUM               jit_r_num()
167 #define JIT_V_NUM               jit_v_num()
168 #define JIT_F_NUM               jit_f_num()
169
170 #define JIT_DISABLE_DATA        1       /* force synthesize of constants */
171 #define JIT_DISABLE_NOTE        2       /* disable debug info generation */
172
173 #define jit_class_chk           0x02000000      /* just checking */
174 #define jit_class_arg           0x08000000      /* argument register */
175 #define jit_class_sav           0x10000000      /* callee save */
176 #define jit_class_gpr           0x20000000      /* general purpose */
177 #define jit_class_fpr           0x40000000      /* float */
178 #define jit_class(reg)          ((reg) & 0xffff0000)
179 #define jit_regno(reg)          ((reg) & 0x00007fff)
180
181 typedef struct jit_node         jit_node_t;
182 typedef struct jit_state        jit_state_t;
183
184 typedef enum {
185     jit_code_data,
186 #define jit_live(u)             jit_new_node_w(jit_code_live, u)
187 #define jit_align(u)            jit_new_node_w(jit_code_align, u)
188     jit_code_live,              jit_code_align,
189     jit_code_save,              jit_code_load,
190 #define jit_name(u)             _jit_name(_jit,u)
191     jit_code_name,
192 #define jit_note(u, v)          _jit_note(_jit, u, v)
193 #define jit_label()             _jit_label(_jit)
194 #define jit_forward()           _jit_forward(_jit)
195 #define jit_indirect()          _jit_indirect(_jit)
196 #define jit_link(u)             _jit_link(_jit,u)
197     jit_code_note,              jit_code_label,
198
199 #define jit_prolog()            _jit_prolog(_jit)
200     jit_code_prolog,
201
202 #define jit_ellipsis()          _jit_ellipsis(_jit)
203     jit_code_ellipsis,
204 #define jit_va_push(u)          _jit_va_push(_jit,u)
205     jit_code_va_push,
206 #define jit_allocai(u)          _jit_allocai(_jit,u)
207 #define jit_allocar(u, v)       _jit_allocar(_jit,u,v)
208     jit_code_allocai,           jit_code_allocar,
209
210 #define jit_arg()               _jit_arg(_jit)
211     jit_code_arg,
212 #define jit_getarg_c(u,v)       _jit_getarg_c(_jit,u,v)
213 #define jit_getarg_uc(u,v)      _jit_getarg_uc(_jit,u,v)
214     jit_code_getarg_c,          jit_code_getarg_uc,
215 #define jit_getarg_s(u,v)       _jit_getarg_s(_jit,u,v)
216 #define jit_getarg_us(u,v)      _jit_getarg_us(_jit,u,v)
217     jit_code_getarg_s,          jit_code_getarg_us,
218 #define jit_getarg_i(u,v)       _jit_getarg_i(_jit,u,v)
219 #if __WORDSIZE == 32
220 #  define jit_getarg(u,v)       jit_getarg_i(u,v)
221 #else
222 #  define jit_getarg(u,v)       jit_getarg_l(u,v)
223 #  define jit_getarg_ui(u,v)    _jit_getarg_ui(_jit,u,v)
224 #  define jit_getarg_l(u,v)     _jit_getarg_l(_jit,u,v)
225 #endif
226     jit_code_getarg_i,          jit_code_getarg_ui,
227     jit_code_getarg_l,
228 #  define jit_putargr(u,v)      _jit_putargr(_jit,u,v)
229 #  define jit_putargi(u,v)      _jit_putargi(_jit,u,v)
230     jit_code_putargr,           jit_code_putargi,
231
232 #define jit_va_start(u)         jit_new_node_w(jit_code_va_start, u)
233     jit_code_va_start,
234 #define jit_va_arg(u, v)        jit_new_node_ww(jit_code_va_arg, u, v)
235 #define jit_va_arg_d(u, v)      jit_new_node_ww(jit_code_va_arg_d, u, v)
236     jit_code_va_arg,            jit_code_va_arg_d,
237 #define jit_va_end(u)           jit_new_node_w(jit_code_va_end, u)
238     jit_code_va_end,
239
240 #define jit_addr(u,v,w)         jit_new_node_www(jit_code_addr,u,v,w)
241 #define jit_addi(u,v,w)         jit_new_node_www(jit_code_addi,u,v,w)
242     jit_code_addr,              jit_code_addi,
243 #define jit_addcr(u,v,w)        jit_new_node_www(jit_code_addcr,u,v,w)
244 #define jit_addci(u,v,w)        jit_new_node_www(jit_code_addci,u,v,w)
245     jit_code_addcr,             jit_code_addci,
246 #define jit_addxr(u,v,w)        jit_new_node_www(jit_code_addxr,u,v,w)
247 #define jit_addxi(u,v,w)        jit_new_node_www(jit_code_addxi,u,v,w)
248     jit_code_addxr,             jit_code_addxi,
249 #define jit_subr(u,v,w)         jit_new_node_www(jit_code_subr,u,v,w)
250 #define jit_subi(u,v,w)         jit_new_node_www(jit_code_subi,u,v,w)
251     jit_code_subr,              jit_code_subi,
252 #define jit_subcr(u,v,w)        jit_new_node_www(jit_code_subcr,u,v,w)
253 #define jit_subci(u,v,w)        jit_new_node_www(jit_code_subci,u,v,w)
254     jit_code_subcr,             jit_code_subci,
255 #define jit_subxr(u,v,w)        jit_new_node_www(jit_code_subxr,u,v,w)
256 #define jit_subxi(u,v,w)        jit_new_node_www(jit_code_subxi,u,v,w)
257     jit_code_subxr,             jit_code_subxi,
258 #define jit_rsbr(u,v,w)         jit_subr(u,w,v)
259 #define jit_rsbi(u,v,w)         jit_new_node_www(jit_code_rsbi,u,v,w)
260     jit_code_rsbi,
261 #define jit_mulr(u,v,w)         jit_new_node_www(jit_code_mulr,u,v,w)
262 #define jit_muli(u,v,w)         jit_new_node_www(jit_code_muli,u,v,w)
263     jit_code_mulr,              jit_code_muli,
264 #define jit_qmulr(l,h,v,w)      jit_new_node_qww(jit_code_qmulr,l,h,v,w)
265 #define jit_qmuli(l,h,v,w)      jit_new_node_qww(jit_code_qmuli,l,h,v,w)
266     jit_code_qmulr,             jit_code_qmuli,
267 #define jit_qmulr_u(l,h,v,w)    jit_new_node_qww(jit_code_qmulr_u,l,h,v,w)
268 #define jit_qmuli_u(l,h,v,w)    jit_new_node_qww(jit_code_qmuli_u,l,h,v,w)
269     jit_code_qmulr_u,           jit_code_qmuli_u,
270 #define jit_divr(u,v,w)         jit_new_node_www(jit_code_divr,u,v,w)
271 #define jit_divi(u,v,w)         jit_new_node_www(jit_code_divi,u,v,w)
272     jit_code_divr,              jit_code_divi,
273 #define jit_divr_u(u,v,w)       jit_new_node_www(jit_code_divr_u,u,v,w)
274 #define jit_divi_u(u,v,w)       jit_new_node_www(jit_code_divi_u,u,v,w)
275     jit_code_divr_u,            jit_code_divi_u,
276 #define jit_qdivr(l,h,v,w)      jit_new_node_qww(jit_code_qdivr,l,h,v,w)
277 #define jit_qdivi(l,h,v,w)      jit_new_node_qww(jit_code_qdivi,l,h,v,w)
278     jit_code_qdivr,             jit_code_qdivi,
279 #define jit_qdivr_u(l,h,v,w)    jit_new_node_qww(jit_code_qdivr_u,l,h,v,w)
280 #define jit_qdivi_u(l,h,v,w)    jit_new_node_qww(jit_code_qdivi_u,l,h,v,w)
281     jit_code_qdivr_u,           jit_code_qdivi_u,
282 #define jit_remr(u,v,w)         jit_new_node_www(jit_code_remr,u,v,w)
283 #define jit_remi(u,v,w)         jit_new_node_www(jit_code_remi,u,v,w)
284     jit_code_remr,              jit_code_remi,
285 #define jit_remr_u(u,v,w)       jit_new_node_www(jit_code_remr_u,u,v,w)
286 #define jit_remi_u(u,v,w)       jit_new_node_www(jit_code_remi_u,u,v,w)
287     jit_code_remr_u,            jit_code_remi_u,
288
289 #define jit_andr(u,v,w)         jit_new_node_www(jit_code_andr,u,v,w)
290 #define jit_andi(u,v,w)         jit_new_node_www(jit_code_andi,u,v,w)
291     jit_code_andr,              jit_code_andi,
292 #define jit_orr(u,v,w)          jit_new_node_www(jit_code_orr,u,v,w)
293 #define jit_ori(u,v,w)          jit_new_node_www(jit_code_ori,u,v,w)
294     jit_code_orr,               jit_code_ori,
295 #define jit_xorr(u,v,w)         jit_new_node_www(jit_code_xorr,u,v,w)
296 #define jit_xori(u,v,w)         jit_new_node_www(jit_code_xori,u,v,w)
297     jit_code_xorr,              jit_code_xori,
298
299 #define jit_lshr(u,v,w)         jit_new_node_www(jit_code_lshr,u,v,w)
300 #define jit_lshi(u,v,w)         jit_new_node_www(jit_code_lshi,u,v,w)
301     jit_code_lshr,              jit_code_lshi,
302 #define jit_rshr(u,v,w)         jit_new_node_www(jit_code_rshr,u,v,w)
303 #define jit_rshi(u,v,w)         jit_new_node_www(jit_code_rshi,u,v,w)
304     jit_code_rshr,              jit_code_rshi,
305 #define jit_rshr_u(u,v,w)       jit_new_node_www(jit_code_rshr_u,u,v,w)
306 #define jit_rshi_u(u,v,w)       jit_new_node_www(jit_code_rshi_u,u,v,w)
307     jit_code_rshr_u,            jit_code_rshi_u,
308
309 #define jit_negr(u,v)           jit_new_node_ww(jit_code_negr,u,v)
310 #define jit_comr(u,v)           jit_new_node_ww(jit_code_comr,u,v)
311     jit_code_negr,              jit_code_comr,
312
313 #define jit_ltr(u,v,w)          jit_new_node_www(jit_code_ltr,u,v,w)
314 #define jit_lti(u,v,w)          jit_new_node_www(jit_code_lti,u,v,w)
315     jit_code_ltr,               jit_code_lti,
316 #define jit_ltr_u(u,v,w)        jit_new_node_www(jit_code_ltr_u,u,v,w)
317 #define jit_lti_u(u,v,w)        jit_new_node_www(jit_code_lti_u,u,v,w)
318     jit_code_ltr_u,             jit_code_lti_u,
319 #define jit_ler(u,v,w)          jit_new_node_www(jit_code_ler,u,v,w)
320 #define jit_lei(u,v,w)          jit_new_node_www(jit_code_lei,u,v,w)
321     jit_code_ler,               jit_code_lei,
322 #define jit_ler_u(u,v,w)        jit_new_node_www(jit_code_ler_u,u,v,w)
323 #define jit_lei_u(u,v,w)        jit_new_node_www(jit_code_lei_u,u,v,w)
324     jit_code_ler_u,             jit_code_lei_u,
325 #define jit_eqr(u,v,w)          jit_new_node_www(jit_code_eqr,u,v,w)
326 #define jit_eqi(u,v,w)          jit_new_node_www(jit_code_eqi,u,v,w)
327     jit_code_eqr,               jit_code_eqi,
328 #define jit_ger(u,v,w)          jit_new_node_www(jit_code_ger,u,v,w)
329 #define jit_gei(u,v,w)          jit_new_node_www(jit_code_gei,u,v,w)
330     jit_code_ger,               jit_code_gei,
331 #define jit_ger_u(u,v,w)        jit_new_node_www(jit_code_ger_u,u,v,w)
332 #define jit_gei_u(u,v,w)        jit_new_node_www(jit_code_gei_u,u,v,w)
333     jit_code_ger_u,             jit_code_gei_u,
334 #define jit_gtr(u,v,w)          jit_new_node_www(jit_code_gtr,u,v,w)
335 #define jit_gti(u,v,w)          jit_new_node_www(jit_code_gti,u,v,w)
336     jit_code_gtr,               jit_code_gti,
337 #define jit_gtr_u(u,v,w)        jit_new_node_www(jit_code_gtr_u,u,v,w)
338 #define jit_gti_u(u,v,w)        jit_new_node_www(jit_code_gti_u,u,v,w)
339     jit_code_gtr_u,             jit_code_gti_u,
340 #define jit_ner(u,v,w)          jit_new_node_www(jit_code_ner,u,v,w)
341 #define jit_nei(u,v,w)          jit_new_node_www(jit_code_nei,u,v,w)
342     jit_code_ner,               jit_code_nei,
343
344 #define jit_movr(u,v)           jit_new_node_ww(jit_code_movr,u,v)
345 #define jit_movi(u,v)           jit_new_node_ww(jit_code_movi,u,v)
346     jit_code_movr,              jit_code_movi,
347
348 #define jit_movnr(u,v,w)        jit_new_node_www(jit_code_movnr,u,v,w)
349 #define jit_movzr(u,v,w)        jit_new_node_www(jit_code_movzr,u,v,w)
350     jit_code_movnr,             jit_code_movzr,
351
352 #define jit_extr_c(u,v)         jit_new_node_ww(jit_code_extr_c,u,v)
353 #define jit_extr_uc(u,v)        jit_new_node_ww(jit_code_extr_uc,u,v)
354     jit_code_extr_c,            jit_code_extr_uc,
355 #define jit_extr_s(u,v)         jit_new_node_ww(jit_code_extr_s,u,v)
356 #define jit_extr_us(u,v)        jit_new_node_ww(jit_code_extr_us,u,v)
357     jit_code_extr_s,            jit_code_extr_us,
358 #if __WORDSIZE == 64
359 #  define jit_extr_i(u,v)       jit_new_node_ww(jit_code_extr_i,u,v)
360 #  define jit_extr_ui(u,v)      jit_new_node_ww(jit_code_extr_ui,u,v)
361 #endif
362     jit_code_extr_i,            jit_code_extr_ui,
363
364 #define jit_htonr_us(u,v)       jit_new_node_ww(jit_code_htonr_us,u,v)
365 #define jit_ntohr_us(u,v)       jit_new_node_ww(jit_code_htonr_us,u,v)
366     jit_code_htonr_us,
367 #define jit_htonr_ui(u,v)       jit_new_node_ww(jit_code_htonr_ui,u,v)
368 #define jit_ntohr_ui(u,v)       jit_new_node_ww(jit_code_htonr_ui,u,v)
369 #if __WORDSIZE == 32
370 #  define jit_htonr(u,v)        jit_new_node_ww(jit_code_htonr_ui,u,v)
371 #  define jit_ntohr(u,v)        jit_new_node_ww(jit_code_htonr_ui,u,v)
372 #else
373 #define jit_htonr_ul(u,v)       jit_new_node_ww(jit_code_htonr_ul,u,v)
374 #define jit_ntohr_ul(u,v)       jit_new_node_ww(jit_code_htonr_ul,u,v)
375 #  define jit_htonr(u,v)        jit_new_node_ww(jit_code_htonr_ul,u,v)
376 #  define jit_ntohr(u,v)        jit_new_node_ww(jit_code_htonr_ul,u,v)
377 #endif
378     jit_code_htonr_ui,          jit_code_htonr_ul,
379
380 #define jit_ldr_c(u,v)          jit_new_node_ww(jit_code_ldr_c,u,v)
381 #define jit_ldi_c(u,v)          jit_new_node_wp(jit_code_ldi_c,u,v)
382     jit_code_ldr_c,             jit_code_ldi_c,
383 #define jit_ldr_uc(u,v)         jit_new_node_ww(jit_code_ldr_uc,u,v)
384 #define jit_ldi_uc(u,v)         jit_new_node_wp(jit_code_ldi_uc,u,v)
385     jit_code_ldr_uc,            jit_code_ldi_uc,
386 #define jit_ldr_s(u,v)          jit_new_node_ww(jit_code_ldr_s,u,v)
387 #define jit_ldi_s(u,v)          jit_new_node_wp(jit_code_ldi_s,u,v)
388     jit_code_ldr_s,             jit_code_ldi_s,
389 #define jit_ldr_us(u,v)         jit_new_node_ww(jit_code_ldr_us,u,v)
390 #define jit_ldi_us(u,v)         jit_new_node_wp(jit_code_ldi_us,u,v)
391     jit_code_ldr_us,            jit_code_ldi_us,
392 #define jit_ldr_i(u,v)          jit_new_node_ww(jit_code_ldr_i,u,v)
393 #define jit_ldi_i(u,v)          jit_new_node_wp(jit_code_ldi_i,u,v)
394     jit_code_ldr_i,             jit_code_ldi_i,
395 #if __WORDSIZE == 32
396 #  define jit_ldr(u,v)          jit_ldr_i(u,v)
397 #  define jit_ldi(u,v)          jit_ldi_i(u,v)
398 #else
399 #  define jit_ldr(u,v)          jit_ldr_l(u,v)
400 #  define jit_ldi(u,v)          jit_ldi_l(u,v)
401 #  define jit_ldr_ui(u,v)       jit_new_node_ww(jit_code_ldr_ui,u,v)
402 #  define jit_ldi_ui(u,v)       jit_new_node_wp(jit_code_ldi_ui,u,v)
403 #define jit_ldr_l(u,v)          jit_new_node_ww(jit_code_ldr_l,u,v)
404 #define jit_ldi_l(u,v)          jit_new_node_wp(jit_code_ldi_l,u,v)
405 #endif
406     jit_code_ldr_ui,            jit_code_ldi_ui,
407     jit_code_ldr_l,             jit_code_ldi_l,
408
409 #define jit_ldxr_c(u,v,w)       jit_new_node_www(jit_code_ldxr_c,u,v,w)
410 #define jit_ldxi_c(u,v,w)       jit_new_node_www(jit_code_ldxi_c,u,v,w)
411     jit_code_ldxr_c,            jit_code_ldxi_c,
412 #define jit_ldxr_uc(u,v,w)      jit_new_node_www(jit_code_ldxr_uc,u,v,w)
413 #define jit_ldxi_uc(u,v,w)      jit_new_node_www(jit_code_ldxi_uc,u,v,w)
414     jit_code_ldxr_uc,           jit_code_ldxi_uc,
415 #define jit_ldxr_s(u,v,w)       jit_new_node_www(jit_code_ldxr_s,u,v,w)
416 #define jit_ldxi_s(u,v,w)       jit_new_node_www(jit_code_ldxi_s,u,v,w)
417     jit_code_ldxr_s,            jit_code_ldxi_s,
418 #define jit_ldxr_us(u,v,w)      jit_new_node_www(jit_code_ldxr_us,u,v,w)
419 #define jit_ldxi_us(u,v,w)      jit_new_node_www(jit_code_ldxi_us,u,v,w)
420     jit_code_ldxr_us,           jit_code_ldxi_us,
421 #define jit_ldxr_i(u,v,w)       jit_new_node_www(jit_code_ldxr_i,u,v,w)
422 #define jit_ldxi_i(u,v,w)       jit_new_node_www(jit_code_ldxi_i,u,v,w)
423     jit_code_ldxr_i,            jit_code_ldxi_i,
424 #if __WORDSIZE == 32
425 #  define jit_ldxr(u,v,w)       jit_ldxr_i(u,v,w)
426 #  define jit_ldxi(u,v,w)       jit_ldxi_i(u,v,w)
427 #else
428 #  define jit_ldxr_ui(u,v,w)    jit_new_node_www(jit_code_ldxr_ui,u,v,w)
429 #  define jit_ldxi_ui(u,v,w)    jit_new_node_www(jit_code_ldxi_ui,u,v,w)
430 #  define jit_ldxr_l(u,v,w)     jit_new_node_www(jit_code_ldxr_l,u,v,w)
431 #  define jit_ldxi_l(u,v,w)     jit_new_node_www(jit_code_ldxi_l,u,v,w)
432 #  define jit_ldxr(u,v,w)       jit_ldxr_l(u,v,w)
433 #  define jit_ldxi(u,v,w)       jit_ldxi_l(u,v,w)
434 #endif
435     jit_code_ldxr_ui,           jit_code_ldxi_ui,
436     jit_code_ldxr_l,            jit_code_ldxi_l,
437
438 #define jit_str_c(u,v)          jit_new_node_ww(jit_code_str_c,u,v)
439 #define jit_sti_c(u,v)          jit_new_node_pw(jit_code_sti_c,u,v)
440     jit_code_str_c,             jit_code_sti_c,
441 #define jit_str_s(u,v)          jit_new_node_ww(jit_code_str_s,u,v)
442 #define jit_sti_s(u,v)          jit_new_node_pw(jit_code_sti_s,u,v)
443     jit_code_str_s,             jit_code_sti_s,
444 #define jit_str_i(u,v)          jit_new_node_ww(jit_code_str_i,u,v)
445 #define jit_sti_i(u,v)          jit_new_node_pw(jit_code_sti_i,u,v)
446     jit_code_str_i,             jit_code_sti_i,
447 #if __WORDSIZE == 32
448 #  define jit_str(u,v)          jit_str_i(u,v)
449 #  define jit_sti(u,v)          jit_sti_i(u,v)
450 #else
451 #  define jit_str(u,v)          jit_str_l(u,v)
452 #  define jit_sti(u,v)          jit_sti_l(u,v)
453 #  define jit_str_l(u,v)        jit_new_node_ww(jit_code_str_l,u,v)
454 #  define jit_sti_l(u,v)        jit_new_node_pw(jit_code_sti_l,u,v)
455 #endif
456     jit_code_str_l,             jit_code_sti_l,
457
458 #define jit_stxr_c(u,v,w)       jit_new_node_www(jit_code_stxr_c,u,v,w)
459 #define jit_stxi_c(u,v,w)       jit_new_node_www(jit_code_stxi_c,u,v,w)
460     jit_code_stxr_c,            jit_code_stxi_c,
461 #define jit_stxr_s(u,v,w)       jit_new_node_www(jit_code_stxr_s,u,v,w)
462 #define jit_stxi_s(u,v,w)       jit_new_node_www(jit_code_stxi_s,u,v,w)
463     jit_code_stxr_s,            jit_code_stxi_s,
464 #define jit_stxr_i(u,v,w)       jit_new_node_www(jit_code_stxr_i,u,v,w)
465 #define jit_stxi_i(u,v,w)       jit_new_node_www(jit_code_stxi_i,u,v,w)
466     jit_code_stxr_i,            jit_code_stxi_i,
467 #if __WORDSIZE == 32
468 #  define jit_stxr(u,v,w)       jit_stxr_i(u,v,w)
469 #  define jit_stxi(u,v,w)       jit_stxi_i(u,v,w)
470 #else
471 #  define jit_stxr(u,v,w)       jit_stxr_l(u,v,w)
472 #  define jit_stxi(u,v,w)       jit_stxi_l(u,v,w)
473 #  define jit_stxr_l(u,v,w)     jit_new_node_www(jit_code_stxr_l,u,v,w)
474 #  define jit_stxi_l(u,v,w)     jit_new_node_www(jit_code_stxi_l,u,v,w)
475 #endif
476     jit_code_stxr_l,            jit_code_stxi_l,
477
478 #define jit_bltr(v,w)           jit_new_node_pww(jit_code_bltr,NULL,v,w)
479 #define jit_blti(v,w)           jit_new_node_pww(jit_code_blti,NULL,v,w)
480     jit_code_bltr,              jit_code_blti,
481 #define jit_bltr_u(v,w)         jit_new_node_pww(jit_code_bltr_u,NULL,v,w)
482 #define jit_blti_u(v,w)         jit_new_node_pww(jit_code_blti_u,NULL,v,w)
483     jit_code_bltr_u,            jit_code_blti_u,
484 #define jit_bler(v,w)           jit_new_node_pww(jit_code_bler,NULL,v,w)
485 #define jit_blei(v,w)           jit_new_node_pww(jit_code_blei,NULL,v,w)
486     jit_code_bler,              jit_code_blei,
487 #define jit_bler_u(v,w)         jit_new_node_pww(jit_code_bler_u,NULL,v,w)
488 #define jit_blei_u(v,w)         jit_new_node_pww(jit_code_blei_u,NULL,v,w)
489     jit_code_bler_u,            jit_code_blei_u,
490 #define jit_beqr(v,w)           jit_new_node_pww(jit_code_beqr,NULL,v,w)
491 #define jit_beqi(v,w)           jit_new_node_pww(jit_code_beqi,NULL,v,w)
492     jit_code_beqr,              jit_code_beqi,
493 #define jit_bger(v,w)           jit_new_node_pww(jit_code_bger,NULL,v,w)
494 #define jit_bgei(v,w)           jit_new_node_pww(jit_code_bgei,NULL,v,w)
495     jit_code_bger,              jit_code_bgei,
496 #define jit_bger_u(v,w)         jit_new_node_pww(jit_code_bger_u,NULL,v,w)
497 #define jit_bgei_u(v,w)         jit_new_node_pww(jit_code_bgei_u,NULL,v,w)
498     jit_code_bger_u,            jit_code_bgei_u,
499 #define jit_bgtr(v,w)           jit_new_node_pww(jit_code_bgtr,NULL,v,w)
500 #define jit_bgti(v,w)           jit_new_node_pww(jit_code_bgti,NULL,v,w)
501     jit_code_bgtr,              jit_code_bgti,
502 #define jit_bgtr_u(v,w)         jit_new_node_pww(jit_code_bgtr_u,NULL,v,w)
503 #define jit_bgti_u(v,w)         jit_new_node_pww(jit_code_bgti_u,NULL,v,w)
504     jit_code_bgtr_u,            jit_code_bgti_u,
505 #define jit_bner(v,w)           jit_new_node_pww(jit_code_bner,NULL,v,w)
506 #define jit_bnei(v,w)           jit_new_node_pww(jit_code_bnei,NULL,v,w)
507     jit_code_bner,              jit_code_bnei,
508
509 #define jit_bmsr(v,w)           jit_new_node_pww(jit_code_bmsr,NULL,v,w)
510 #define jit_bmsi(v,w)           jit_new_node_pww(jit_code_bmsi,NULL,v,w)
511     jit_code_bmsr,              jit_code_bmsi,
512 #define jit_bmcr(v,w)           jit_new_node_pww(jit_code_bmcr,NULL,v,w)
513 #define jit_bmci(v,w)           jit_new_node_pww(jit_code_bmci,NULL,v,w)
514     jit_code_bmcr,              jit_code_bmci,
515
516 #define jit_boaddr(v,w)         jit_new_node_pww(jit_code_boaddr,NULL,v,w)
517 #define jit_boaddi(v,w)         jit_new_node_pww(jit_code_boaddi,NULL,v,w)
518     jit_code_boaddr,            jit_code_boaddi,
519 #define jit_boaddr_u(v,w)       jit_new_node_pww(jit_code_boaddr_u,NULL,v,w)
520 #define jit_boaddi_u(v,w)       jit_new_node_pww(jit_code_boaddi_u,NULL,v,w)
521     jit_code_boaddr_u,          jit_code_boaddi_u,
522 #define jit_bxaddr(v,w)         jit_new_node_pww(jit_code_bxaddr,NULL,v,w)
523 #define jit_bxaddi(v,w)         jit_new_node_pww(jit_code_bxaddi,NULL,v,w)
524     jit_code_bxaddr,            jit_code_bxaddi,
525 #define jit_bxaddr_u(v,w)       jit_new_node_pww(jit_code_bxaddr_u,NULL,v,w)
526 #define jit_bxaddi_u(v,w)       jit_new_node_pww(jit_code_bxaddi_u,NULL,v,w)
527     jit_code_bxaddr_u,          jit_code_bxaddi_u,
528 #define jit_bosubr(v,w)         jit_new_node_pww(jit_code_bosubr,NULL,v,w)
529 #define jit_bosubi(v,w)         jit_new_node_pww(jit_code_bosubi,NULL,v,w)
530     jit_code_bosubr,            jit_code_bosubi,
531 #define jit_bosubr_u(v,w)       jit_new_node_pww(jit_code_bosubr_u,NULL,v,w)
532 #define jit_bosubi_u(v,w)       jit_new_node_pww(jit_code_bosubi_u,NULL,v,w)
533     jit_code_bosubr_u,          jit_code_bosubi_u,
534 #define jit_bxsubr(v,w)         jit_new_node_pww(jit_code_bxsubr,NULL,v,w)
535 #define jit_bxsubi(v,w)         jit_new_node_pww(jit_code_bxsubi,NULL,v,w)
536     jit_code_bxsubr,            jit_code_bxsubi,
537 #define jit_bxsubr_u(v,w)       jit_new_node_pww(jit_code_bxsubr_u,NULL,v,w)
538 #define jit_bxsubi_u(v,w)       jit_new_node_pww(jit_code_bxsubi_u,NULL,v,w)
539     jit_code_bxsubr_u,          jit_code_bxsubi_u,
540
541 #define jit_jmpr(u)             jit_new_node_w(jit_code_jmpr,u)
542 #define jit_jmpi()              jit_new_node_p(jit_code_jmpi,NULL)
543     jit_code_jmpr,              jit_code_jmpi,
544 #define jit_callr(u)            jit_new_node_w(jit_code_callr,u)
545 #define jit_calli(u)            jit_new_node_p(jit_code_calli,u)
546     jit_code_callr,             jit_code_calli,
547
548 #define jit_prepare()           _jit_prepare(_jit)
549     jit_code_prepare,
550 #define jit_pushargr(u)         _jit_pushargr(_jit,u)
551 #define jit_pushargi(u)         _jit_pushargi(_jit,u)
552     jit_code_pushargr,          jit_code_pushargi,
553 #define jit_finishr(u)          _jit_finishr(_jit,u)
554 #define jit_finishi(u)          _jit_finishi(_jit,u)
555     jit_code_finishr,           jit_code_finishi,
556 #define jit_ret()               _jit_ret(_jit)
557     jit_code_ret,
558 #define jit_retr(u)             _jit_retr(_jit,u)
559 #define jit_reti(u)             _jit_reti(_jit,u)
560     jit_code_retr,              jit_code_reti,
561 #define jit_retval_c(u)         _jit_retval_c(_jit,u)
562 #define jit_retval_uc(u)        _jit_retval_uc(_jit,u)
563     jit_code_retval_c,          jit_code_retval_uc,
564 #define jit_retval_s(u)         _jit_retval_s(_jit,u)
565 #define jit_retval_us(u)        _jit_retval_us(_jit,u)
566     jit_code_retval_s,          jit_code_retval_us,
567 #define jit_retval_i(u)         _jit_retval_i(_jit,u)
568 #if __WORDSIZE == 32
569 #  define jit_retval(u)         jit_retval_i(u)
570 #else
571 #  define jit_retval(u)         jit_retval_l(u)
572 #  define jit_retval_ui(u)      _jit_retval_ui(_jit,u)
573 #  define jit_retval_l(u)       _jit_retval_l(_jit,u)
574 #endif
575     jit_code_retval_i,          jit_code_retval_ui,
576     jit_code_retval_l,
577
578 #define jit_epilog()            _jit_epilog(_jit)
579     jit_code_epilog,
580
581 #define jit_arg_f()             _jit_arg_f(_jit)
582     jit_code_arg_f,
583 #define jit_getarg_f(u,v)       _jit_getarg_f(_jit,u,v)
584     jit_code_getarg_f,
585 #define jit_putargr_f(u,v)      _jit_putargr_f(_jit,u,v)
586 #define jit_putargi_f(u,v)      _jit_putargi_f(_jit,u,v)
587     jit_code_putargr_f,         jit_code_putargi_f,
588
589 #define jit_addr_f(u,v,w)       jit_new_node_www(jit_code_addr_f,u,v,w)
590 #define jit_addi_f(u,v,w)       jit_new_node_wwf(jit_code_addi_f,u,v,w)
591     jit_code_addr_f,            jit_code_addi_f,
592 #define jit_subr_f(u,v,w)       jit_new_node_www(jit_code_subr_f,u,v,w)
593 #define jit_subi_f(u,v,w)       jit_new_node_wwf(jit_code_subi_f,u,v,w)
594     jit_code_subr_f,            jit_code_subi_f,
595 #define jit_rsbr_f(u,v,w)       jit_subr_f(u,w,v)
596 #define jit_rsbi_f(u,v,w)       jit_new_node_wwf(jit_code_rsbi_f,u,v,w)
597     jit_code_rsbi_f,
598 #define jit_mulr_f(u,v,w)       jit_new_node_www(jit_code_mulr_f,u,v,w)
599 #define jit_muli_f(u,v,w)       jit_new_node_wwf(jit_code_muli_f,u,v,w)
600     jit_code_mulr_f,            jit_code_muli_f,
601 #define jit_divr_f(u,v,w)       jit_new_node_www(jit_code_divr_f,u,v,w)
602 #define jit_divi_f(u,v,w)       jit_new_node_wwf(jit_code_divi_f,u,v,w)
603     jit_code_divr_f,            jit_code_divi_f,
604 #define jit_negr_f(u,v)         jit_new_node_ww(jit_code_negr_f,u,v)
605 #define jit_absr_f(u,v)         jit_new_node_ww(jit_code_absr_f,u,v)
606 #define jit_sqrtr_f(u,v)        jit_new_node_ww(jit_code_sqrtr_f,u,v)
607     jit_code_negr_f,            jit_code_absr_f,        jit_code_sqrtr_f,
608
609 #define jit_ltr_f(u,v,w)        jit_new_node_www(jit_code_ltr_f,u,v,w)
610 #define jit_lti_f(u,v,w)        jit_new_node_wwf(jit_code_lti_f,u,v,w)
611     jit_code_ltr_f,             jit_code_lti_f,
612 #define jit_ler_f(u,v,w)        jit_new_node_www(jit_code_ler_f,u,v,w)
613 #define jit_lei_f(u,v,w)        jit_new_node_wwf(jit_code_lei_f,u,v,w)
614     jit_code_ler_f,             jit_code_lei_f,
615 #define jit_eqr_f(u,v,w)        jit_new_node_www(jit_code_eqr_f,u,v,w)
616 #define jit_eqi_f(u,v,w)        jit_new_node_wwf(jit_code_eqi_f,u,v,w)
617     jit_code_eqr_f,             jit_code_eqi_f,
618 #define jit_ger_f(u,v,w)        jit_new_node_www(jit_code_ger_f,u,v,w)
619 #define jit_gei_f(u,v,w)        jit_new_node_wwf(jit_code_gei_f,u,v,w)
620     jit_code_ger_f,             jit_code_gei_f,
621 #define jit_gtr_f(u,v,w)        jit_new_node_www(jit_code_gtr_f,u,v,w)
622 #define jit_gti_f(u,v,w)        jit_new_node_wwf(jit_code_gti_f,u,v,w)
623     jit_code_gtr_f,             jit_code_gti_f,
624 #define jit_ner_f(u,v,w)        jit_new_node_www(jit_code_ner_f,u,v,w)
625 #define jit_nei_f(u,v,w)        jit_new_node_wwf(jit_code_nei_f,u,v,w)
626     jit_code_ner_f,             jit_code_nei_f,
627 #define jit_unltr_f(u,v,w)      jit_new_node_www(jit_code_unltr_f,u,v,w)
628 #define jit_unlti_f(u,v,w)      jit_new_node_wwf(jit_code_unlti_f,u,v,w)
629     jit_code_unltr_f,           jit_code_unlti_f,
630 #define jit_unler_f(u,v,w)      jit_new_node_www(jit_code_unler_f,u,v,w)
631 #define jit_unlei_f(u,v,w)      jit_new_node_wwf(jit_code_unlei_f,u,v,w)
632     jit_code_unler_f,           jit_code_unlei_f,
633 #define jit_uneqr_f(u,v,w)      jit_new_node_www(jit_code_uneqr_f,u,v,w)
634 #define jit_uneqi_f(u,v,w)      jit_new_node_wwf(jit_code_uneqi_f,u,v,w)
635     jit_code_uneqr_f,           jit_code_uneqi_f,
636 #define jit_unger_f(u,v,w)      jit_new_node_www(jit_code_unger_f,u,v,w)
637 #define jit_ungei_f(u,v,w)      jit_new_node_wwf(jit_code_ungei_f,u,v,w)
638     jit_code_unger_f,           jit_code_ungei_f,
639 #define jit_ungtr_f(u,v,w)      jit_new_node_www(jit_code_ungtr_f,u,v,w)
640 #define jit_ungti_f(u,v,w)      jit_new_node_wwf(jit_code_ungti_f,u,v,w)
641     jit_code_ungtr_f,           jit_code_ungti_f,
642 #define jit_ltgtr_f(u,v,w)      jit_new_node_www(jit_code_ltgtr_f,u,v,w)
643 #define jit_ltgti_f(u,v,w)      jit_new_node_wwf(jit_code_ltgti_f,u,v,w)
644     jit_code_ltgtr_f,           jit_code_ltgti_f,
645 #define jit_ordr_f(u,v,w)       jit_new_node_www(jit_code_ordr_f,u,v,w)
646 #define jit_ordi_f(u,v,w)       jit_new_node_wwf(jit_code_ordi_f,u,v,w)
647     jit_code_ordr_f,            jit_code_ordi_f,
648 #define jit_unordr_f(u,v,w)     jit_new_node_www(jit_code_unordr_f,u,v,w)
649 #define jit_unordi_f(u,v,w)     jit_new_node_wwf(jit_code_unordi_f,u,v,w)
650     jit_code_unordr_f,          jit_code_unordi_f,
651
652 #define jit_truncr_f_i(u,v)     jit_new_node_ww(jit_code_truncr_f_i,u,v)
653     jit_code_truncr_f_i,
654 #if __WORDSIZE == 32
655 #  define jit_truncr_f(u,v)     jit_truncr_f_i(u,v)
656 #else
657 #  define jit_truncr_f(u,v)     jit_truncr_f_l(u,v)
658 #  define jit_truncr_f_l(u,v)   jit_new_node_ww(jit_code_truncr_f_l,u,v)
659 #endif
660     jit_code_truncr_f_l,
661 #define jit_extr_f(u,v)         jit_new_node_ww(jit_code_extr_f,u,v)
662 #define jit_extr_d_f(u,v)       jit_new_node_ww(jit_code_extr_d_f,u,v)
663     jit_code_extr_f,            jit_code_extr_d_f,
664 #define jit_movr_f(u,v)         jit_new_node_ww(jit_code_movr_f,u,v)
665 #define jit_movi_f(u,v)         jit_new_node_wf(jit_code_movi_f,u,v)
666     jit_code_movr_f,            jit_code_movi_f,
667
668 #define jit_ldr_f(u,v)          jit_new_node_ww(jit_code_ldr_f,u,v)
669 #define jit_ldi_f(u,v)          jit_new_node_wp(jit_code_ldi_f,u,v)
670     jit_code_ldr_f,             jit_code_ldi_f,
671 #define jit_ldxr_f(u,v,w)       jit_new_node_www(jit_code_ldxr_f,u,v,w)
672 #define jit_ldxi_f(u,v,w)       jit_new_node_www(jit_code_ldxi_f,u,v,w)
673     jit_code_ldxr_f,            jit_code_ldxi_f,
674 #define jit_str_f(u,v)          jit_new_node_ww(jit_code_str_f,u,v)
675 #define jit_sti_f(u,v)          jit_new_node_pw(jit_code_sti_f,u,v)
676     jit_code_str_f,             jit_code_sti_f,
677 #define jit_stxr_f(u,v,w)       jit_new_node_www(jit_code_stxr_f,u,v,w)
678 #define jit_stxi_f(u,v,w)       jit_new_node_www(jit_code_stxi_f,u,v,w)
679     jit_code_stxr_f,            jit_code_stxi_f,
680
681 #define jit_bltr_f(v,w)         jit_new_node_pww(jit_code_bltr_f,NULL,v,w)
682 #define jit_blti_f(v,w)         jit_new_node_pwf(jit_code_blti_f,NULL,v,w)
683     jit_code_bltr_f,            jit_code_blti_f,
684 #define jit_bler_f(v,w)         jit_new_node_pww(jit_code_bler_f,NULL,v,w)
685 #define jit_blei_f(v,w)         jit_new_node_pwf(jit_code_blei_f,NULL,v,w)
686     jit_code_bler_f,            jit_code_blei_f,
687 #define jit_beqr_f(v,w)         jit_new_node_pww(jit_code_beqr_f,NULL,v,w)
688 #define jit_beqi_f(v,w)         jit_new_node_pwf(jit_code_beqi_f,NULL,v,w)
689     jit_code_beqr_f,            jit_code_beqi_f,
690 #define jit_bger_f(v,w)         jit_new_node_pww(jit_code_bger_f,NULL,v,w)
691 #define jit_bgei_f(v,w)         jit_new_node_pwf(jit_code_bgei_f,NULL,v,w)
692     jit_code_bger_f,            jit_code_bgei_f,
693 #define jit_bgtr_f(v,w)         jit_new_node_pww(jit_code_bgtr_f,NULL,v,w)
694 #define jit_bgti_f(v,w)         jit_new_node_pwf(jit_code_bgti_f,NULL,v,w)
695     jit_code_bgtr_f,            jit_code_bgti_f,
696 #define jit_bner_f(v,w)         jit_new_node_pww(jit_code_bner_f,NULL,v,w)
697 #define jit_bnei_f(v,w)         jit_new_node_pwf(jit_code_bnei_f,NULL,v,w)
698     jit_code_bner_f,            jit_code_bnei_f,
699 #define jit_bunltr_f(v,w)       jit_new_node_pww(jit_code_bunltr_f,NULL,v,w)
700 #define jit_bunlti_f(v,w)       jit_new_node_pwf(jit_code_bunlti_f,NULL,v,w)
701     jit_code_bunltr_f,          jit_code_bunlti_f,
702 #define jit_bunler_f(v,w)       jit_new_node_pww(jit_code_bunler_f,NULL,v,w)
703 #define jit_bunlei_f(v,w)       jit_new_node_pwf(jit_code_bunlei_f,NULL,v,w)
704     jit_code_bunler_f,          jit_code_bunlei_f,
705 #define jit_buneqr_f(v,w)       jit_new_node_pww(jit_code_buneqr_f,NULL,v,w)
706 #define jit_buneqi_f(v,w)       jit_new_node_pwf(jit_code_buneqi_f,NULL,v,w)
707     jit_code_buneqr_f,          jit_code_buneqi_f,
708 #define jit_bunger_f(v,w)       jit_new_node_pww(jit_code_bunger_f,NULL,v,w)
709 #define jit_bungei_f(v,w)       jit_new_node_pwf(jit_code_bungei_f,NULL,v,w)
710     jit_code_bunger_f,          jit_code_bungei_f,
711 #define jit_bungtr_f(v,w)       jit_new_node_pww(jit_code_bungtr_f,NULL,v,w)
712 #define jit_bungti_f(v,w)       jit_new_node_pwf(jit_code_bungti_f,NULL,v,w)
713     jit_code_bungtr_f,          jit_code_bungti_f,
714 #define jit_bltgtr_f(v,w)       jit_new_node_pww(jit_code_bltgtr_f,NULL,v,w)
715 #define jit_bltgti_f(v,w)       jit_new_node_pwf(jit_code_bltgti_f,NULL,v,w)
716     jit_code_bltgtr_f,          jit_code_bltgti_f,
717 #define jit_bordr_f(v,w)        jit_new_node_pww(jit_code_bordr_f,NULL,v,w)
718 #define jit_bordi_f(v,w)        jit_new_node_pwf(jit_code_bordi_f,NULL,v,w)
719     jit_code_bordr_f,           jit_code_bordi_f,
720 #define jit_bunordr_f(v,w)      jit_new_node_pww(jit_code_bunordr_f,NULL,v,w)
721 #define jit_bunordi_f(v,w)      jit_new_node_pwf(jit_code_bunordi_f,NULL,v,w)
722     jit_code_bunordr_f,         jit_code_bunordi_f,
723
724 #define jit_pushargr_f(u)       _jit_pushargr_f(_jit,u)
725 #define jit_pushargi_f(u)       _jit_pushargi_f(_jit,u)
726     jit_code_pushargr_f,        jit_code_pushargi_f,
727 #define jit_retr_f(u)           _jit_retr_f(_jit,u)
728 #define jit_reti_f(u)           _jit_reti_f(_jit,u)
729     jit_code_retr_f,            jit_code_reti_f,
730 #define jit_retval_f(u)         _jit_retval_f(_jit,u)
731     jit_code_retval_f,
732
733 #define jit_arg_d()             _jit_arg_d(_jit)
734     jit_code_arg_d,
735 #define jit_getarg_d(u,v)       _jit_getarg_d(_jit,u,v)
736     jit_code_getarg_d,
737 #define jit_putargr_d(u,v)      _jit_putargr_d(_jit,u,v)
738 #define jit_putargi_d(u,v)      _jit_putargi_d(_jit,u,v)
739     jit_code_putargr_d,         jit_code_putargi_d,
740
741 #define jit_addr_d(u,v,w)       jit_new_node_www(jit_code_addr_d,u,v,w)
742 #define jit_addi_d(u,v,w)       jit_new_node_wwd(jit_code_addi_d,u,v,w)
743     jit_code_addr_d,            jit_code_addi_d,
744 #define jit_subr_d(u,v,w)       jit_new_node_www(jit_code_subr_d,u,v,w)
745 #define jit_subi_d(u,v,w)       jit_new_node_wwd(jit_code_subi_d,u,v,w)
746     jit_code_subr_d,            jit_code_subi_d,
747 #define jit_rsbr_d(u,v,w)       jit_subr_d(u,w,v)
748 #define jit_rsbi_d(u,v,w)       jit_new_node_wwd(jit_code_rsbi_d,u,v,w)
749     jit_code_rsbi_d,
750 #define jit_mulr_d(u,v,w)       jit_new_node_www(jit_code_mulr_d,u,v,w)
751 #define jit_muli_d(u,v,w)       jit_new_node_wwd(jit_code_muli_d,u,v,w)
752     jit_code_mulr_d,            jit_code_muli_d,
753 #define jit_divr_d(u,v,w)       jit_new_node_www(jit_code_divr_d,u,v,w)
754 #define jit_divi_d(u,v,w)       jit_new_node_wwd(jit_code_divi_d,u,v,w)
755     jit_code_divr_d,            jit_code_divi_d,
756
757 #define jit_negr_d(u,v)         jit_new_node_ww(jit_code_negr_d,u,v)
758 #define jit_absr_d(u,v)         jit_new_node_ww(jit_code_absr_d,u,v)
759 #define jit_sqrtr_d(u,v)        jit_new_node_ww(jit_code_sqrtr_d,u,v)
760     jit_code_negr_d,            jit_code_absr_d,        jit_code_sqrtr_d,
761
762 #define jit_ltr_d(u,v,w)        jit_new_node_www(jit_code_ltr_d,u,v,w)
763 #define jit_lti_d(u,v,w)        jit_new_node_wwd(jit_code_lti_d,u,v,w)
764     jit_code_ltr_d,             jit_code_lti_d,
765 #define jit_ler_d(u,v,w)        jit_new_node_www(jit_code_ler_d,u,v,w)
766 #define jit_lei_d(u,v,w)        jit_new_node_wwd(jit_code_lei_d,u,v,w)
767     jit_code_ler_d,             jit_code_lei_d,
768 #define jit_eqr_d(u,v,w)        jit_new_node_www(jit_code_eqr_d,u,v,w)
769 #define jit_eqi_d(u,v,w)        jit_new_node_wwd(jit_code_eqi_d,u,v,w)
770     jit_code_eqr_d,             jit_code_eqi_d,
771 #define jit_ger_d(u,v,w)        jit_new_node_www(jit_code_ger_d,u,v,w)
772 #define jit_gei_d(u,v,w)        jit_new_node_wwd(jit_code_gei_d,u,v,w)
773     jit_code_ger_d,             jit_code_gei_d,
774 #define jit_gtr_d(u,v,w)        jit_new_node_www(jit_code_gtr_d,u,v,w)
775 #define jit_gti_d(u,v,w)        jit_new_node_wwd(jit_code_gti_d,u,v,w)
776     jit_code_gtr_d,             jit_code_gti_d,
777 #define jit_ner_d(u,v,w)        jit_new_node_www(jit_code_ner_d,u,v,w)
778 #define jit_nei_d(u,v,w)        jit_new_node_wwd(jit_code_nei_d,u,v,w)
779     jit_code_ner_d,             jit_code_nei_d,
780 #define jit_unltr_d(u,v,w)      jit_new_node_www(jit_code_unltr_d,u,v,w)
781 #define jit_unlti_d(u,v,w)      jit_new_node_wwd(jit_code_unlti_d,u,v,w)
782     jit_code_unltr_d,           jit_code_unlti_d,
783 #define jit_unler_d(u,v,w)      jit_new_node_www(jit_code_unler_d,u,v,w)
784 #define jit_unlei_d(u,v,w)      jit_new_node_wwd(jit_code_unlei_d,u,v,w)
785     jit_code_unler_d,           jit_code_unlei_d,
786 #define jit_uneqr_d(u,v,w)      jit_new_node_www(jit_code_uneqr_d,u,v,w)
787 #define jit_uneqi_d(u,v,w)      jit_new_node_wwd(jit_code_uneqi_d,u,v,w)
788     jit_code_uneqr_d,           jit_code_uneqi_d,
789 #define jit_unger_d(u,v,w)      jit_new_node_www(jit_code_unger_d,u,v,w)
790 #define jit_ungei_d(u,v,w)      jit_new_node_wwd(jit_code_ungei_d,u,v,w)
791     jit_code_unger_d,           jit_code_ungei_d,
792 #define jit_ungtr_d(u,v,w)      jit_new_node_www(jit_code_ungtr_d,u,v,w)
793 #define jit_ungti_d(u,v,w)      jit_new_node_wwd(jit_code_ungti_d,u,v,w)
794     jit_code_ungtr_d,           jit_code_ungti_d,
795 #define jit_ltgtr_d(u,v,w)      jit_new_node_www(jit_code_ltgtr_d,u,v,w)
796 #define jit_ltgti_d(u,v,w)      jit_new_node_wwd(jit_code_ltgti_d,u,v,w)
797     jit_code_ltgtr_d,           jit_code_ltgti_d,
798 #define jit_ordr_d(u,v,w)       jit_new_node_www(jit_code_ordr_d,u,v,w)
799 #define jit_ordi_d(u,v,w)       jit_new_node_wwd(jit_code_ordi_d,u,v,w)
800     jit_code_ordr_d,            jit_code_ordi_d,
801 #define jit_unordr_d(u,v,w)     jit_new_node_www(jit_code_unordr_d,u,v,w)
802 #define jit_unordi_d(u,v,w)     jit_new_node_wwd(jit_code_unordi_d,u,v,w)
803     jit_code_unordr_d,          jit_code_unordi_d,
804
805 #define jit_truncr_d_i(u,v)     jit_new_node_ww(jit_code_truncr_d_i,u,v)
806     jit_code_truncr_d_i,
807 #if __WORDSIZE == 32
808 #  define jit_truncr_d(u,v)     jit_truncr_d_i(u,v)
809 #else
810 #  define jit_truncr_d(u,v)     jit_truncr_d_l(u,v)
811 #  define jit_truncr_d_l(u,v)   jit_new_node_ww(jit_code_truncr_d_l,u,v)
812 #endif
813     jit_code_truncr_d_l,
814 #define jit_extr_d(u,v)         jit_new_node_ww(jit_code_extr_d,u,v)
815 #define jit_extr_f_d(u,v)       jit_new_node_ww(jit_code_extr_f_d,u,v)
816     jit_code_extr_d,            jit_code_extr_f_d,
817 #define jit_movr_d(u,v)         jit_new_node_ww(jit_code_movr_d,u,v)
818 #define jit_movi_d(u,v)         jit_new_node_wd(jit_code_movi_d,u,v)
819     jit_code_movr_d,            jit_code_movi_d,
820
821 #define jit_ldr_d(u,v)          jit_new_node_ww(jit_code_ldr_d,u,v)
822 #define jit_ldi_d(u,v)          jit_new_node_wp(jit_code_ldi_d,u,v)
823     jit_code_ldr_d,             jit_code_ldi_d,
824 #define jit_ldxr_d(u,v,w)       jit_new_node_www(jit_code_ldxr_d,u,v,w)
825 #define jit_ldxi_d(u,v,w)       jit_new_node_www(jit_code_ldxi_d,u,v,w)
826     jit_code_ldxr_d,            jit_code_ldxi_d,
827 #define jit_str_d(u,v)          jit_new_node_ww(jit_code_str_d,u,v)
828 #define jit_sti_d(u,v)          jit_new_node_pw(jit_code_sti_d,u,v)
829     jit_code_str_d,             jit_code_sti_d,
830 #define jit_stxr_d(u,v,w)       jit_new_node_www(jit_code_stxr_d,u,v,w)
831 #define jit_stxi_d(u,v,w)       jit_new_node_www(jit_code_stxi_d,u,v,w)
832     jit_code_stxr_d,            jit_code_stxi_d,
833
834 #define jit_bltr_d(v,w)         jit_new_node_pww(jit_code_bltr_d,NULL,v,w)
835 #define jit_blti_d(v,w)         jit_new_node_pwd(jit_code_blti_d,NULL,v,w)
836     jit_code_bltr_d,            jit_code_blti_d,
837 #define jit_bler_d(v,w)         jit_new_node_pww(jit_code_bler_d,NULL,v,w)
838 #define jit_blei_d(v,w)         jit_new_node_pwd(jit_code_blei_d,NULL,v,w)
839     jit_code_bler_d,            jit_code_blei_d,
840 #define jit_beqr_d(v,w)         jit_new_node_pww(jit_code_beqr_d,NULL,v,w)
841 #define jit_beqi_d(v,w)         jit_new_node_pwd(jit_code_beqi_d,NULL,v,w)
842     jit_code_beqr_d,            jit_code_beqi_d,
843 #define jit_bger_d(v,w)         jit_new_node_pww(jit_code_bger_d,NULL,v,w)
844 #define jit_bgei_d(v,w)         jit_new_node_pwd(jit_code_bgei_d,NULL,v,w)
845     jit_code_bger_d,            jit_code_bgei_d,
846 #define jit_bgtr_d(v,w)         jit_new_node_pww(jit_code_bgtr_d,NULL,v,w)
847 #define jit_bgti_d(v,w)         jit_new_node_pwd(jit_code_bgti_d,NULL,v,w)
848     jit_code_bgtr_d,            jit_code_bgti_d,
849 #define jit_bner_d(v,w)         jit_new_node_pww(jit_code_bner_d,NULL,v,w)
850 #define jit_bnei_d(v,w)         jit_new_node_pwd(jit_code_bnei_d,NULL,v,w)
851     jit_code_bner_d,            jit_code_bnei_d,
852 #define jit_bunltr_d(v,w)       jit_new_node_pww(jit_code_bunltr_d,NULL,v,w)
853 #define jit_bunlti_d(v,w)       jit_new_node_pwd(jit_code_bunlti_d,NULL,v,w)
854     jit_code_bunltr_d,          jit_code_bunlti_d,
855 #define jit_bunler_d(v,w)       jit_new_node_pww(jit_code_bunler_d,NULL,v,w)
856 #define jit_bunlei_d(v,w)       jit_new_node_pwd(jit_code_bunlei_d,NULL,v,w)
857     jit_code_bunler_d,          jit_code_bunlei_d,
858 #define jit_buneqr_d(v,w)       jit_new_node_pww(jit_code_buneqr_d,NULL,v,w)
859 #define jit_buneqi_d(v,w)       jit_new_node_pwd(jit_code_buneqi_d,NULL,v,w)
860     jit_code_buneqr_d,          jit_code_buneqi_d,
861 #define jit_bunger_d(v,w)       jit_new_node_pww(jit_code_bunger_d,NULL,v,w)
862 #define jit_bungei_d(v,w)       jit_new_node_pwd(jit_code_bungei_d,NULL,v,w)
863     jit_code_bunger_d,          jit_code_bungei_d,
864 #define jit_bungtr_d(v,w)       jit_new_node_pww(jit_code_bungtr_d,NULL,v,w)
865 #define jit_bungti_d(v,w)       jit_new_node_pwd(jit_code_bungti_d,NULL,v,w)
866     jit_code_bungtr_d,          jit_code_bungti_d,
867 #define jit_bltgtr_d(v,w)       jit_new_node_pww(jit_code_bltgtr_d,NULL,v,w)
868 #define jit_bltgti_d(v,w)       jit_new_node_pwd(jit_code_bltgti_d,NULL,v,w)
869     jit_code_bltgtr_d,          jit_code_bltgti_d,
870 #define jit_bordr_d(v,w)        jit_new_node_pww(jit_code_bordr_d,NULL,v,w)
871 #define jit_bordi_d(v,w)        jit_new_node_pwd(jit_code_bordi_d,NULL,v,w)
872     jit_code_bordr_d,           jit_code_bordi_d,
873 #define jit_bunordr_d(v,w)      jit_new_node_pww(jit_code_bunordr_d,NULL,v,w)
874 #define jit_bunordi_d(v,w)      jit_new_node_pwd(jit_code_bunordi_d,NULL,v,w)
875     jit_code_bunordr_d,         jit_code_bunordi_d,
876
877 #define jit_pushargr_d(u)       _jit_pushargr_d(_jit,u)
878 #define jit_pushargi_d(u)       _jit_pushargi_d(_jit,u)
879     jit_code_pushargr_d,        jit_code_pushargi_d,
880 #define jit_retr_d(u)           _jit_retr_d(_jit,u)
881 #define jit_reti_d(u)           _jit_reti_d(_jit,u)
882     jit_code_retr_d,            jit_code_reti_d,
883 #define jit_retval_d(u)         _jit_retval_d(_jit,u)
884     jit_code_retval_d,
885
886     /* Special internal backend specific codes */
887     jit_code_movr_w_f,          jit_code_movr_ww_d,     /* w* -> f|d */
888 #define jit_movr_w_f(u, v)      jit_new_node_ww(jit_code_movr_w_f, u, v)
889 #define jit_movr_ww_d(u, v, w)  jit_new_node_www(jit_code_movr_ww_d, u, v, w)
890     jit_code_movr_w_d,                                  /* w -> d */
891 #define jit_movr_w_d(u, v)      jit_new_node_ww(jit_code_movr_w_d, u, v)
892
893     jit_code_movr_f_w,          jit_code_movi_f_w,      /* f|d -> w* */
894 #define jit_movr_f_w(u, v)      jit_new_node_ww(jit_code_movr_f_w, u, v)
895 #define jit_movi_f_w(u, v)      jit_new_node_wf(jit_code_movi_f_w, u, v)
896     jit_code_movr_d_ww,         jit_code_movi_d_ww,
897 #define jit_movr_d_ww(u, v, w)  jit_new_node_www(jit_code_movr_d_ww, u, v, w)
898 #define jit_movi_d_ww(u, v, w)  jit_new_node_wwd(jit_code_movi_d_ww, u, v, w)
899
900     jit_code_movr_d_w,          jit_code_movi_d_w,      /* d -> w */
901 #define jit_movr_d_w(u, v)      jit_new_node_ww(jit_code_movr_d_w, u, v)
902 #define jit_movi_d_w(u, v)      jit_new_node_wd(jit_code_movi_d_w, u, v)
903
904 #define jit_bswapr_us(u,v)      jit_new_node_ww(jit_code_bswapr_us,u,v)
905     jit_code_bswapr_us,
906 #define jit_bswapr_ui(u,v)      jit_new_node_ww(jit_code_bswapr_ui,u,v)
907     jit_code_bswapr_ui,
908 #define jit_bswapr_ul(u,v)      jit_new_node_ww(jit_code_bswapr_ul,u,v)
909     jit_code_bswapr_ul,
910 #if __WORDSIZE == 32
911 #define jit_bswapr(u,v)         jit_new_node_ww(jit_code_bswapr_ui,u,v)
912 #else
913 #define jit_bswapr(u,v)         jit_new_node_ww(jit_code_bswapr_ul,u,v)
914 #endif
915
916     jit_code_last_code
917 } jit_code_t;
918
919 typedef void* (*jit_alloc_func_ptr)     (size_t);
920 typedef void* (*jit_realloc_func_ptr)   (void*, size_t);
921 typedef void  (*jit_free_func_ptr)      (void*);
922
923 /*
924  * Prototypes
925  */
926 extern void init_jit(const char*);
927 extern void finish_jit(void);
928
929 extern jit_state_t *jit_new_state(void);
930 #define jit_clear_state()       _jit_clear_state(_jit)
931 extern void _jit_clear_state(jit_state_t*);
932 #define jit_destroy_state()     _jit_destroy_state(_jit)
933 extern void _jit_destroy_state(jit_state_t*);
934
935 #define jit_address(node)       _jit_address(_jit, node)
936 extern jit_pointer_t _jit_address(jit_state_t*, jit_node_t*);
937 extern jit_node_t *_jit_name(jit_state_t*, const char*);
938 extern jit_node_t *_jit_note(jit_state_t*, const char*, int);
939 extern jit_node_t *_jit_label(jit_state_t*);
940 extern jit_node_t *_jit_forward(jit_state_t*);
941 extern jit_node_t *_jit_indirect(jit_state_t*);
942 extern void _jit_link(jit_state_t*, jit_node_t*);
943 #define jit_forward_p(u)        _jit_forward_p(_jit,u)
944 extern jit_bool_t _jit_forward_p(jit_state_t*,jit_node_t*);
945 #define jit_indirect_p(u)       _jit_indirect_p(_jit,u)
946 extern jit_bool_t _jit_indirect_p(jit_state_t*,jit_node_t*);
947 #define jit_target_p(u)         _jit_target_p(_jit,u)
948 extern jit_bool_t _jit_target_p(jit_state_t*,jit_node_t*);
949
950 extern void _jit_prolog(jit_state_t*);
951
952 extern jit_int32_t _jit_allocai(jit_state_t*, jit_int32_t);
953 extern void _jit_allocar(jit_state_t*, jit_int32_t, jit_int32_t);
954 extern void _jit_ellipsis(jit_state_t*);
955
956 extern jit_node_t *_jit_arg(jit_state_t*);
957 extern void _jit_getarg_c(jit_state_t*, jit_gpr_t, jit_node_t*);
958 extern void _jit_getarg_uc(jit_state_t*, jit_gpr_t, jit_node_t*);
959 extern void _jit_getarg_s(jit_state_t*, jit_gpr_t, jit_node_t*);
960 extern void _jit_getarg_us(jit_state_t*, jit_gpr_t, jit_node_t*);
961 extern void _jit_getarg_i(jit_state_t*, jit_gpr_t, jit_node_t*);
962 #if __WORDSIZE == 64
963 extern void _jit_getarg_ui(jit_state_t*, jit_gpr_t, jit_node_t*);
964 extern void _jit_getarg_l(jit_state_t*, jit_gpr_t, jit_node_t*);
965 #endif
966 extern void _jit_putargr(jit_state_t*, jit_gpr_t, jit_node_t*);
967 extern void _jit_putargi(jit_state_t*, jit_word_t, jit_node_t*);
968
969 extern void _jit_prepare(jit_state_t*);
970 extern void _jit_ellipsis(jit_state_t*);
971 extern void _jit_va_push(jit_state_t*, jit_gpr_t);
972 extern void _jit_pushargr(jit_state_t*, jit_gpr_t);
973 extern void _jit_pushargi(jit_state_t*, jit_word_t);
974 extern void _jit_finishr(jit_state_t*, jit_gpr_t);
975 extern jit_node_t *_jit_finishi(jit_state_t*, jit_pointer_t);
976 extern void _jit_ret(jit_state_t*);
977 extern void _jit_retr(jit_state_t*, jit_gpr_t);
978 extern void _jit_reti(jit_state_t*, jit_word_t);
979 extern void _jit_retval_c(jit_state_t*, jit_gpr_t);
980 extern void _jit_retval_uc(jit_state_t*, jit_gpr_t);
981 extern void _jit_retval_s(jit_state_t*, jit_gpr_t);
982 extern void _jit_retval_us(jit_state_t*, jit_gpr_t);
983 extern void _jit_retval_i(jit_state_t*, jit_gpr_t);
984 #if __WORDSIZE == 64
985 extern void _jit_retval_ui(jit_state_t*, jit_gpr_t);
986 extern void _jit_retval_l(jit_state_t*, jit_gpr_t);
987 #endif
988 extern void _jit_epilog(jit_state_t*);
989
990 #define jit_patch(u)            _jit_patch(_jit,u)
991 extern void _jit_patch(jit_state_t*, jit_node_t*);
992 #define jit_patch_at(u,v)       _jit_patch_at(_jit,u,v)
993 extern void _jit_patch_at(jit_state_t*, jit_node_t*, jit_node_t*);
994 #define jit_patch_abs(u,v)      _jit_patch_abs(_jit,u,v)
995 extern void _jit_patch_abs(jit_state_t*, jit_node_t*, jit_pointer_t);
996 #define jit_realize()           _jit_realize(_jit)
997 extern void _jit_realize(jit_state_t*);
998 #define jit_get_code(u)         _jit_get_code(_jit,u)
999 extern jit_pointer_t _jit_get_code(jit_state_t*, jit_word_t*);
1000 #define jit_set_code(u,v)       _jit_set_code(_jit,u,v)
1001 extern void _jit_set_code(jit_state_t*, jit_pointer_t, jit_word_t);
1002 #define jit_get_data(u,v)       _jit_get_data(_jit,u,v)
1003 extern jit_pointer_t _jit_get_data(jit_state_t*, jit_word_t*, jit_word_t*);
1004 #define jit_set_data(u,v,w)     _jit_set_data(_jit,u,v,w)
1005 extern void _jit_set_data(jit_state_t*, jit_pointer_t, jit_word_t, jit_word_t);
1006 #define jit_frame(u)            _jit_frame(_jit,u)
1007 extern void _jit_frame(jit_state_t*, jit_int32_t);
1008 #define jit_tramp(u)            _jit_tramp(_jit,u)
1009 extern void _jit_tramp(jit_state_t*, jit_int32_t);
1010 #define jit_emit()              _jit_emit(_jit)
1011 extern jit_pointer_t _jit_emit(jit_state_t*);
1012
1013 #define jit_print()             _jit_print(_jit)
1014 extern void _jit_print(jit_state_t*);
1015
1016 extern jit_node_t *_jit_arg_f(jit_state_t*);
1017 extern void _jit_getarg_f(jit_state_t*, jit_fpr_t, jit_node_t*);
1018 extern void _jit_putargr_f(jit_state_t*, jit_fpr_t, jit_node_t*);
1019 extern void _jit_putargi_f(jit_state_t*, jit_float32_t, jit_node_t*);
1020 extern void _jit_pushargr_f(jit_state_t*, jit_fpr_t);
1021 extern void _jit_pushargi_f(jit_state_t*, jit_float32_t);
1022 extern void _jit_retr_f(jit_state_t*, jit_fpr_t);
1023 extern void _jit_reti_f(jit_state_t*, jit_float32_t);
1024 extern void _jit_retval_f(jit_state_t*, jit_fpr_t);
1025
1026 extern jit_node_t *_jit_arg_d(jit_state_t*);
1027 extern void _jit_getarg_d(jit_state_t*, jit_fpr_t, jit_node_t*);
1028 extern void _jit_putargr_d(jit_state_t*, jit_fpr_t, jit_node_t*);
1029 extern void _jit_putargi_d(jit_state_t*, jit_float64_t, jit_node_t*);
1030 extern void _jit_pushargr_d(jit_state_t*, jit_fpr_t);
1031 extern void _jit_pushargi_d(jit_state_t*, jit_float64_t);
1032 extern void _jit_retr_d(jit_state_t*, jit_fpr_t);
1033 extern void _jit_reti_d(jit_state_t*, jit_float64_t);
1034 extern void _jit_retval_d(jit_state_t*, jit_fpr_t);
1035
1036 #define jit_get_reg(s)          _jit_get_reg(_jit,s)
1037 extern jit_int32_t _jit_get_reg(jit_state_t*, jit_int32_t);
1038
1039 #define jit_unget_reg(r)        _jit_unget_reg(_jit,r)
1040 extern void _jit_unget_reg(jit_state_t*, jit_int32_t);
1041
1042 #define jit_new_node(c)         _jit_new_node(_jit,c)
1043 extern jit_node_t *_jit_new_node(jit_state_t*, jit_code_t);
1044 #define jit_new_node_w(c,u)     _jit_new_node_w(_jit,c,u)
1045 extern jit_node_t *_jit_new_node_w(jit_state_t*, jit_code_t,
1046                                    jit_word_t);
1047 #define jit_new_node_f(c,u)     _jit_new_node_f(_jit,c,u)
1048 extern jit_node_t *_jit_new_node_f(jit_state_t*, jit_code_t,
1049                                    jit_float32_t);
1050 #define jit_new_node_d(c,u)     _jit_new_node_d(_jit,c,u)
1051 extern jit_node_t *_jit_new_node_d(jit_state_t*, jit_code_t,
1052                                    jit_float64_t);
1053 #define jit_new_node_p(c,u)     _jit_new_node_p(_jit,c,u)
1054 extern jit_node_t *_jit_new_node_p(jit_state_t*, jit_code_t,
1055                                    jit_pointer_t);
1056 #define jit_new_node_ww(c,u,v)  _jit_new_node_ww(_jit,c,u,v)
1057 extern jit_node_t *_jit_new_node_ww(jit_state_t*,jit_code_t,
1058                                     jit_word_t, jit_word_t);
1059 #define jit_new_node_wp(c,u,v)  _jit_new_node_wp(_jit,c,u,v)
1060 extern jit_node_t *_jit_new_node_wp(jit_state_t*,jit_code_t,
1061                                     jit_word_t, jit_pointer_t);
1062 #define jit_new_node_fp(c,u,v)  _jit_new_node_fp(_jit,c,u,v)
1063 extern jit_node_t *_jit_new_node_fp(jit_state_t*,jit_code_t,
1064                                     jit_float32_t, jit_pointer_t);
1065 #define jit_new_node_dp(c,u,v)  _jit_new_node_dp(_jit,c,u,v)
1066 extern jit_node_t *_jit_new_node_dp(jit_state_t*,jit_code_t,
1067                                     jit_float64_t, jit_pointer_t);
1068 #define jit_new_node_pw(c,u,v)  _jit_new_node_pw(_jit,c,u,v)
1069 extern jit_node_t *_jit_new_node_pw(jit_state_t*,jit_code_t,
1070                                     jit_pointer_t, jit_word_t);
1071 #define jit_new_node_wf(c,u,v)  _jit_new_node_wf(_jit,c,u,v)
1072 extern jit_node_t *_jit_new_node_wf(jit_state_t*, jit_code_t,
1073                                     jit_word_t, jit_float32_t);
1074 #define jit_new_node_wd(c,u,v)  _jit_new_node_wd(_jit,c,u,v)
1075 extern jit_node_t *_jit_new_node_wd(jit_state_t*, jit_code_t,
1076                                     jit_word_t, jit_float64_t);
1077 #define jit_new_node_www(c,u,v,w) _jit_new_node_www(_jit,c,u,v,w)
1078 extern jit_node_t *_jit_new_node_www(jit_state_t*, jit_code_t,
1079                                      jit_word_t, jit_word_t, jit_word_t);
1080 #define jit_new_node_qww(c,l,h,v,w) _jit_new_node_qww(_jit,c,l,h,v,w)
1081 extern jit_node_t *_jit_new_node_qww(jit_state_t*, jit_code_t,
1082                                      jit_int32_t, jit_int32_t,
1083                                      jit_word_t, jit_word_t);
1084 #define jit_new_node_wwf(c,u,v,w) _jit_new_node_wwf(_jit,c,u,v,w)
1085 extern jit_node_t *_jit_new_node_wwf(jit_state_t*, jit_code_t,
1086                                      jit_word_t, jit_word_t, jit_float32_t);
1087 #define jit_new_node_wwd(c,u,v,w) _jit_new_node_wwd(_jit,c,u,v,w)
1088 extern jit_node_t *_jit_new_node_wwd(jit_state_t*, jit_code_t,
1089                                      jit_word_t, jit_word_t, jit_float64_t);
1090 #define jit_new_node_pww(c,u,v,w) _jit_new_node_pww(_jit,c,u,v,w)
1091 extern jit_node_t *_jit_new_node_pww(jit_state_t*, jit_code_t,
1092                                      jit_pointer_t, jit_word_t, jit_word_t);
1093 #define jit_new_node_pwf(c,u,v,w) _jit_new_node_pwf(_jit,c,u,v,w)
1094 extern jit_node_t *_jit_new_node_pwf(jit_state_t*, jit_code_t,
1095                                      jit_pointer_t, jit_word_t, jit_float32_t);
1096 #define jit_new_node_pwd(c,u,v,w) _jit_new_node_pwd(_jit,c,u,v,w)
1097 extern jit_node_t *_jit_new_node_pwd(jit_state_t*, jit_code_t,
1098                                      jit_pointer_t, jit_word_t, jit_float64_t);
1099
1100 #define jit_arg_register_p(u)           _jit_arg_register_p(_jit,u)
1101 extern jit_bool_t _jit_arg_register_p(jit_state_t*, jit_node_t*);
1102 #define jit_callee_save_p(u)            _jit_callee_save_p(_jit,u)
1103 extern jit_bool_t _jit_callee_save_p(jit_state_t*, jit_int32_t);
1104 #define jit_pointer_p(u)                _jit_pointer_p(_jit,u)
1105 extern jit_bool_t _jit_pointer_p(jit_state_t*,jit_pointer_t);
1106
1107 #define jit_get_note(n,u,v,w)   _jit_get_note(_jit,n,u,v,w)
1108 extern jit_bool_t _jit_get_note(jit_state_t*,jit_pointer_t,char**,char**,int*);
1109
1110 #define jit_disassemble()               _jit_disassemble(_jit)
1111 extern void _jit_disassemble(jit_state_t*);
1112
1113 extern void jit_set_memory_functions(jit_alloc_func_ptr,
1114                                      jit_realloc_func_ptr,
1115                                      jit_free_func_ptr);
1116 extern void jit_get_memory_functions(jit_alloc_func_ptr*,
1117                                      jit_realloc_func_ptr*,
1118                                      jit_free_func_ptr*);
1119
1120 #endif /* _lightning_h */