summaryrefslogtreecommitdiff
path: root/arm
diff options
context:
space:
mode:
Diffstat (limited to 'arm')
-rw-r--r--arm/PrintAsm.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/arm/PrintAsm.ml b/arm/PrintAsm.ml
index a506bed..cb3ce4d 100644
--- a/arm/PrintAsm.ml
+++ b/arm/PrintAsm.ml
@@ -648,9 +648,7 @@ let print_instruction oc = function
| Pfreeframe(sz, ofs) ->
if Asmgen.is_immed_arith sz
then fprintf oc " add sp, sp, #%a\n" coqint sz
- else fprintf oc " ldr sp, [sp, #%a]\n" coqint ofs;
- cfi_adjust oc (Int32.neg (camlint_of_coqint sz));
- 1
+ else fprintf oc " ldr sp, [sp, #%a]\n" coqint ofs; 1
| Plabel lbl ->
fprintf oc "%a:\n" print_label lbl; 0
| Ploadsymbol(r1, id, ofs) ->