summaryrefslogtreecommitdiffstats
path: root/asmrun/signals.c
diff options
context:
space:
mode:
Diffstat (limited to 'asmrun/signals.c')
-rw-r--r--asmrun/signals.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/asmrun/signals.c b/asmrun/signals.c
index 30d9402f4..38f6c4085 100644
--- a/asmrun/signals.c
+++ b/asmrun/signals.c
@@ -391,6 +391,10 @@ DECLARE_SIGNAL_HANDLER(trap_handler)
#endif
caml_exception_pointer = (char *) CONTEXT_EXCEPTION_POINTER;
caml_young_ptr = (char *) CONTEXT_YOUNG_PTR;
+#if defined(SYS_rhapsody)
+ caml_bottom_of_stack = (char *) CONTEXT_SP;
+ caml_last_return_address = (uintnat) CONTEXT_PC;
+#endif
caml_array_bound_error();
}
#endif