give better error message for windows exceptions, and don't lop off the top end of...

[factor.git] / vm / errors.cpp

diff --git a/vm/errors.cpp b/vm/errors.cpp
index a1fc71ffbc38ea88fbc3326b7d15fea336dad167..c587fa723a32d1a2a603a3c0e3cffe9415e98d88 100755 (executable)
--- a/vm/errors.cpp
+++ b/vm/errors.cpp
@@ -112,7 +112,7 @@ void factor_vm::memory_protection_error(cell addr, stack_frame *native_stack)
 
 void factor_vm::signal_error(int signal, stack_frame *native_stack)
 {
-       general_error(ERROR_SIGNAL,tag_fixnum(signal),false_object,native_stack);
+       general_error(ERROR_SIGNAL,allot_cell(signal),false_object,native_stack);
 }
 
 void factor_vm::divide_by_zero_error()