summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--asmrun/amd64.S4
1 files changed, 2 insertions, 2 deletions
diff --git a/asmrun/amd64.S b/asmrun/amd64.S
index 7dbafd441..791b2f411 100644
--- a/asmrun/amd64.S
+++ b/asmrun/amd64.S
@@ -367,9 +367,9 @@ LBL(caml_c_call):
STORE_VAR(%r15, caml_young_ptr)
STORE_VAR(%r14, caml_exception_pointer)
/* Call the function (address in %rax) */
- PREPARE_FOR_C_CALL
+ /* No need to PREPARE_FOR_C_CALL since the caller already
+ reserved the stack space if needed (cf. amd64/proc.ml) */
call *%rax
- CLEANUP_AFTER_C_CALL
/* Reload alloc ptr */
LOAD_VAR(caml_young_ptr, %r15)
/* Return to caller */