6 PRIMITIVE_FORWARD(bignum_to_fixnum)
7 PRIMITIVE_FORWARD(float_to_fixnum)
8 PRIMITIVE_FORWARD(fixnum_to_bignum)
9 PRIMITIVE_FORWARD(float_to_bignum)
10 PRIMITIVE_FORWARD(fixnum_to_float)
11 PRIMITIVE_FORWARD(bignum_to_float)
12 PRIMITIVE_FORWARD(str_to_float)
13 PRIMITIVE_FORWARD(float_to_str)
14 PRIMITIVE_FORWARD(float_bits)
15 PRIMITIVE_FORWARD(double_bits)
16 PRIMITIVE_FORWARD(bits_float)
17 PRIMITIVE_FORWARD(bits_double)
18 PRIMITIVE_FORWARD(fixnum_divint)
19 PRIMITIVE_FORWARD(fixnum_divmod)
20 PRIMITIVE_FORWARD(fixnum_shift)
21 PRIMITIVE_FORWARD(bignum_eq)
22 PRIMITIVE_FORWARD(bignum_add)
23 PRIMITIVE_FORWARD(bignum_subtract)
24 PRIMITIVE_FORWARD(bignum_multiply)
25 PRIMITIVE_FORWARD(bignum_divint)
26 PRIMITIVE_FORWARD(bignum_mod)
27 PRIMITIVE_FORWARD(bignum_divmod)
28 PRIMITIVE_FORWARD(bignum_and)
29 PRIMITIVE_FORWARD(bignum_or)
30 PRIMITIVE_FORWARD(bignum_xor)
31 PRIMITIVE_FORWARD(bignum_not)
32 PRIMITIVE_FORWARD(bignum_shift)
33 PRIMITIVE_FORWARD(bignum_less)
34 PRIMITIVE_FORWARD(bignum_lesseq)
35 PRIMITIVE_FORWARD(bignum_greater)
36 PRIMITIVE_FORWARD(bignum_greatereq)
37 PRIMITIVE_FORWARD(bignum_bitp)
38 PRIMITIVE_FORWARD(bignum_log2)
39 PRIMITIVE_FORWARD(byte_array_to_bignum)
40 PRIMITIVE_FORWARD(float_eq)
41 PRIMITIVE_FORWARD(float_add)
42 PRIMITIVE_FORWARD(float_subtract)
43 PRIMITIVE_FORWARD(float_multiply)
44 PRIMITIVE_FORWARD(float_divfloat)
45 PRIMITIVE_FORWARD(float_mod)
46 PRIMITIVE_FORWARD(float_less)
47 PRIMITIVE_FORWARD(float_lesseq)
48 PRIMITIVE_FORWARD(float_greater)
49 PRIMITIVE_FORWARD(float_greatereq)
50 PRIMITIVE_FORWARD(word)
51 PRIMITIVE_FORWARD(word_xt)
52 PRIMITIVE_FORWARD(getenv)
53 PRIMITIVE_FORWARD(setenv)
54 PRIMITIVE_FORWARD(existsp)
55 PRIMITIVE_FORWARD(minor_gc)
56 PRIMITIVE_FORWARD(full_gc)
57 PRIMITIVE_FORWARD(compact_gc)
58 PRIMITIVE_FORWARD(gc_stats)
59 PRIMITIVE_FORWARD(save_image)
60 PRIMITIVE_FORWARD(save_image_and_exit)
61 PRIMITIVE_FORWARD(datastack)
62 PRIMITIVE_FORWARD(retainstack)
63 PRIMITIVE_FORWARD(callstack)
64 PRIMITIVE_FORWARD(set_datastack)
65 PRIMITIVE_FORWARD(set_retainstack)
66 PRIMITIVE_FORWARD(set_callstack)
67 PRIMITIVE_FORWARD(exit)
68 PRIMITIVE_FORWARD(data_room)
69 PRIMITIVE_FORWARD(code_room)
70 PRIMITIVE_FORWARD(micros)
71 PRIMITIVE_FORWARD(modify_code_heap)
72 PRIMITIVE_FORWARD(dlopen)
73 PRIMITIVE_FORWARD(dlsym)
74 PRIMITIVE_FORWARD(dlclose)
75 PRIMITIVE_FORWARD(byte_array)
76 PRIMITIVE_FORWARD(uninitialized_byte_array)
77 PRIMITIVE_FORWARD(displaced_alien)
78 PRIMITIVE_FORWARD(alien_address)
79 PRIMITIVE_FORWARD(set_slot)
80 PRIMITIVE_FORWARD(string_nth)
81 PRIMITIVE_FORWARD(set_string_nth_fast)
82 PRIMITIVE_FORWARD(set_string_nth_slow)
83 PRIMITIVE_FORWARD(resize_array)
84 PRIMITIVE_FORWARD(resize_string)
85 PRIMITIVE_FORWARD(array)
86 PRIMITIVE_FORWARD(begin_scan)
87 PRIMITIVE_FORWARD(next_object)
88 PRIMITIVE_FORWARD(end_scan)
89 PRIMITIVE_FORWARD(size)
90 PRIMITIVE_FORWARD(die)
91 PRIMITIVE_FORWARD(fopen)
92 PRIMITIVE_FORWARD(fgetc)
93 PRIMITIVE_FORWARD(fread)
94 PRIMITIVE_FORWARD(fputc)
95 PRIMITIVE_FORWARD(fwrite)
96 PRIMITIVE_FORWARD(fflush)
97 PRIMITIVE_FORWARD(ftell)
98 PRIMITIVE_FORWARD(fseek)
99 PRIMITIVE_FORWARD(fclose)
100 PRIMITIVE_FORWARD(wrapper)
101 PRIMITIVE_FORWARD(clone)
102 PRIMITIVE_FORWARD(string)
103 PRIMITIVE_FORWARD(array_to_quotation)
104 PRIMITIVE_FORWARD(quotation_xt)
105 PRIMITIVE_FORWARD(tuple)
106 PRIMITIVE_FORWARD(profiling)
107 PRIMITIVE_FORWARD(become)
108 PRIMITIVE_FORWARD(sleep)
109 PRIMITIVE_FORWARD(tuple_boa)
110 PRIMITIVE_FORWARD(callstack_to_array)
111 PRIMITIVE_FORWARD(innermost_stack_frame_executing)
112 PRIMITIVE_FORWARD(innermost_stack_frame_scan)
113 PRIMITIVE_FORWARD(set_innermost_stack_frame_quot)
114 PRIMITIVE_FORWARD(call_clear)
115 PRIMITIVE_FORWARD(resize_byte_array)
116 PRIMITIVE_FORWARD(dll_validp)
117 PRIMITIVE_FORWARD(unimplemented)
118 PRIMITIVE_FORWARD(clear_gc_stats)
119 PRIMITIVE_FORWARD(jit_compile)
120 PRIMITIVE_FORWARD(load_locals)
121 PRIMITIVE_FORWARD(check_datastack)
122 PRIMITIVE_FORWARD(mega_cache_miss)
123 PRIMITIVE_FORWARD(lookup_method)
124 PRIMITIVE_FORWARD(reset_dispatch_stats)
125 PRIMITIVE_FORWARD(dispatch_stats)
126 PRIMITIVE_FORWARD(reset_inline_cache_stats)
127 PRIMITIVE_FORWARD(inline_cache_stats)
128 PRIMITIVE_FORWARD(optimized_p)
129 PRIMITIVE_FORWARD(quot_compiled_p)
130 PRIMITIVE_FORWARD(vm_ptr)
131 PRIMITIVE_FORWARD(strip_stack_traces)
132 PRIMITIVE_FORWARD(callback)
134 const primitive_type primitives[] = {
135 primitive_bignum_to_fixnum,
136 primitive_float_to_fixnum,
137 primitive_fixnum_to_bignum,
138 primitive_float_to_bignum,
139 primitive_fixnum_to_float,
140 primitive_bignum_to_float,
141 primitive_str_to_float,
142 primitive_float_to_str,
143 primitive_float_bits,
144 primitive_double_bits,
145 primitive_bits_float,
146 primitive_bits_double,
147 primitive_fixnum_add,
148 primitive_fixnum_subtract,
149 primitive_fixnum_multiply,
150 primitive_fixnum_divint,
151 primitive_fixnum_divmod,
152 primitive_fixnum_shift,
154 primitive_bignum_add,
155 primitive_bignum_subtract,
156 primitive_bignum_multiply,
157 primitive_bignum_divint,
158 primitive_bignum_mod,
159 primitive_bignum_divmod,
160 primitive_bignum_and,
162 primitive_bignum_xor,
163 primitive_bignum_not,
164 primitive_bignum_shift,
165 primitive_bignum_less,
166 primitive_bignum_lesseq,
167 primitive_bignum_greater,
168 primitive_bignum_greatereq,
169 primitive_bignum_bitp,
170 primitive_bignum_log2,
171 primitive_byte_array_to_bignum,
174 primitive_float_subtract,
175 primitive_float_multiply,
176 primitive_float_divfloat,
178 primitive_float_less,
179 primitive_float_lesseq,
180 primitive_float_greater,
181 primitive_float_greatereq,
182 /* The unordered comparison primitives don't have a non-optimizing
183 compiler implementation */
184 primitive_float_less,
185 primitive_float_lesseq,
186 primitive_float_greater,
187 primitive_float_greatereq,
195 primitive_compact_gc,
197 primitive_save_image,
198 primitive_save_image_and_exit,
200 primitive_retainstack,
202 primitive_set_datastack,
203 primitive_set_retainstack,
204 primitive_set_callstack,
209 primitive_modify_code_heap,
213 primitive_byte_array,
214 primitive_uninitialized_byte_array,
215 primitive_displaced_alien,
216 primitive_alien_signed_cell,
217 primitive_set_alien_signed_cell,
218 primitive_alien_unsigned_cell,
219 primitive_set_alien_unsigned_cell,
220 primitive_alien_signed_8,
221 primitive_set_alien_signed_8,
222 primitive_alien_unsigned_8,
223 primitive_set_alien_unsigned_8,
224 primitive_alien_signed_4,
225 primitive_set_alien_signed_4,
226 primitive_alien_unsigned_4,
227 primitive_set_alien_unsigned_4,
228 primitive_alien_signed_2,
229 primitive_set_alien_signed_2,
230 primitive_alien_unsigned_2,
231 primitive_set_alien_unsigned_2,
232 primitive_alien_signed_1,
233 primitive_set_alien_signed_1,
234 primitive_alien_unsigned_1,
235 primitive_set_alien_unsigned_1,
236 primitive_alien_float,
237 primitive_set_alien_float,
238 primitive_alien_double,
239 primitive_set_alien_double,
240 primitive_alien_cell,
241 primitive_set_alien_cell,
242 primitive_alien_address,
244 primitive_string_nth,
245 primitive_set_string_nth_fast,
246 primitive_set_string_nth_slow,
247 primitive_resize_array,
248 primitive_resize_string,
250 primitive_begin_scan,
251 primitive_next_object,
267 primitive_array_to_quotation,
268 primitive_quotation_xt,
274 primitive_callstack_to_array,
275 primitive_innermost_stack_frame_executing,
276 primitive_innermost_stack_frame_scan,
277 primitive_set_innermost_stack_frame_quot,
278 primitive_call_clear,
279 primitive_resize_byte_array,
280 primitive_dll_validp,
281 primitive_unimplemented,
282 primitive_clear_gc_stats,
283 primitive_jit_compile,
284 primitive_load_locals,
285 primitive_check_datastack,
286 primitive_inline_cache_miss,
287 primitive_inline_cache_miss_tail,
288 primitive_mega_cache_miss,
289 primitive_lookup_method,
290 primitive_reset_dispatch_stats,
291 primitive_dispatch_stats,
292 primitive_reset_inline_cache_stats,
293 primitive_inline_cache_stats,
294 primitive_optimized_p,
295 primitive_quot_compiled_p,
297 primitive_strip_stack_traces,