diff options
Diffstat (limited to 'asmcomp/amd64/emit.mlp')
-rw-r--r-- | asmcomp/amd64/emit.mlp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/asmcomp/amd64/emit.mlp b/asmcomp/amd64/emit.mlp index 39fa014ce7..7efbe75aa6 100644 --- a/asmcomp/amd64/emit.mlp +++ b/asmcomp/amd64/emit.mlp @@ -538,7 +538,7 @@ let emit_instr env fallthrough i = | Lop(Iextcall { func; alloc; stack_ofs }) -> add_used_symbol func; if stack_ofs > 0 then begin - I.lea (mem64 QWORD 0 RSP) r13; + I.mov rsp r13; I.lea (mem64 QWORD stack_ofs RSP) r12; load_symbol_addr func rax; emit_call "caml_c_call_stack_args"; |