general_error(ERROR_TYPE, tag_fixnum(type), tagged);
}
-// Allocates memory
-void factor_vm::not_implemented_error() {
- general_error(ERROR_NOT_IMPLEMENTED, false_object, false_object);
-}
-
void factor_vm::set_memory_protection_error(cell fault_addr, cell fault_pc) {
// Called from the OS-specific top halves of the signal handlers to
// make sure it's safe to dispatch to memory_signal_handler_impl.
general_error(ERROR_DIVIDE_BY_ZERO, false_object, false_object);
}
-// For testing purposes
-// Allocates memory
-void factor_vm::primitive_unimplemented() { not_implemented_error(); }
-
// Allocates memory
void memory_signal_handler_impl() {
factor_vm* vm = current_vm();