audio.engine.test: cleanup using

[factor.git] / vm / primitives.hpp

diff --git a/vm/primitives.hpp b/vm/primitives.hpp
index 0209a4e6f64486256745db9aa82c7b6e29359cc2..ea45a3faa40d3761b98baf5918e5e86cc785b00e 100644 (file)
--- a/vm/primitives.hpp
+++ b/vm/primitives.hpp
@@ -1,6 +1,6 @@
 namespace factor {
 
-/* Generated with PRIMITIVE in primitives.cpp */
+// Generated with PRIMITIVE in primitives.cpp
 
 #define EACH_PRIMITIVE(_)                                                      \
   _(alien_address) _(all_instances) _(array) _(array_to_quotation) _(become)   \
@@ -10,14 +10,16 @@ namespace factor {
       _(bignum_gcd) _(bignum_multiply) _(bignum_not) _(bignum_or)              \
       _(bignum_shift) _(bignum_subtract) _(bignum_to_fixnum)                   \
       _(bignum_to_fixnum_strict) _(bignum_xor) _(bits_double) _(bits_float)    \
-      _(byte_array) _(callback) _(callback_room) _(callstack)                  \
+      _(byte_array) _(callback) _(callback_room)                               \
       _(callstack_bounds) _(callstack_for) _(callstack_to_array)               \
-      _(check_datastack) _(clear_samples) _(clone) _(code_blocks) _(code_room) \
+      _(check_datastack) _(clone) _(code_blocks) _(code_room)                  \
       _(compact_gc) _(compute_identity_hashcode) _(context_object)             \
-      _(context_object_for) _(current_callback) _(data_room) _(datastack)      \
-      _(datastack_for) _(die) _(disable_gc_events) _(dispatch_stats)           \
+      _(context_object_for) _(current_callback) _(data_room)                   \
+      _(datastack_for) _(die) _(disable_ctrl_break) _(disable_gc_events)       \
+      _(dispatch_stats)                                                        \
       _(displaced_alien) _(dlclose) _(dll_validp) _(dlopen) _(dlsym)           \
-      _(dlsym_raw) _(double_bits) _(enable_gc_events) _(existsp) _(exit)       \
+      _(dlsym_raw) _(double_bits) _(enable_ctrl_break) _(enable_gc_events)     \
+      _(existsp) _(exit)                                                       \
       _(fclose) _(fflush) _(fgetc) _(fixnum_divint) _(fixnum_divmod)           \
       _(fixnum_shift) _(fixnum_to_bignum) _(fixnum_to_float) _(float_add)      \
       _(float_bits) _(float_divfloat) _(float_eq) _(float_greater)             \
@@ -29,17 +31,17 @@ namespace factor {
       _(jit_compile) _(load_locals) _(lookup_method) _(mega_cache_miss)        \
       _(minor_gc) _(modify_code_heap) _(nano_count) _(quotation_code)          \
       _(quotation_compiled_p) _(reset_dispatch_stats) _(resize_array)          \
-      _(resize_byte_array) _(resize_string) _(retainstack) _(retainstack_for)  \
-      _(sampling_profiler) _(save_image) _(set_context_object)                 \
-      _(set_datastack) _(set_innermost_stack_frame_quotation)                  \
+      _(resize_byte_array) _(resize_string) _(retainstack_for)                 \
+      _(save_image) _(set_context_object) _(set_datastack)                     \
+      _(set_innermost_stack_frame_quotation) _(set_profiling)                  \
       _(set_retainstack) _(set_slot) _(set_special_object)                     \
       _(set_string_nth_fast) _(size) _(sleep) _(special_object) _(string)      \
-      _(strip_stack_traces) _(tuple) _(tuple_boa) _(unimplemented)             \
+      _(strip_stack_traces) _(tuple) _(tuple_boa)                              \
       _(uninitialized_byte_array) _(word) _(word_code) _(word_optimized_p)     \
       _(wrapper)
 
 #define EACH_ALIEN_PRIMITIVE(_)                               \
-  _(signed_cell, fixnum, from_signed_cell, to_fixnum)         \
+      _(signed_cell, fixnum, from_signed_cell, to_fixnum)     \
       _(unsigned_cell, cell, from_unsigned_cell, to_cell)     \
       _(signed_8, int64_t, from_signed_8, to_signed_8)        \
       _(unsigned_8, uint64_t, from_unsigned_8, to_unsigned_8) \
@@ -51,7 +53,7 @@ namespace factor {
       _(unsigned_1, uint8_t, from_unsigned_cell, to_cell)     \
       _(float, float, allot_float, to_float)                  \
       _(double, double, allot_float, to_double)               \
-      _(cell, void*, allot_alien, pinned_alien_offset)
+      _(cell, cell, allot_alien, pinned_alien_offset)
 
 #define DECLARE_PRIMITIVE(name) \
   VM_C_API void primitive_##name(factor_vm * parent);