diff options
| -rw-r--r-- | asmrun/arm.S | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/asmrun/arm.S b/asmrun/arm.S index 814ac631f..b34fe5683 100644 --- a/asmrun/arm.S +++ b/asmrun/arm.S @@ -244,9 +244,9 @@ caml_start_program: /* The trap handler */ .Ltrap_handler: - /* Save young_ptr */ - ldr r4, .Lyoung_ptr - str alloc_ptr, [r4, #0] + /* Save exception pointer */ + ldr r4, .Lcaml_exception_pointer + str trap_ptr, [r4, #0] /* Encode exception bucket as an exception result */ orr r0, r0, #2 /* Return it */ |