summaryrefslogtreecommitdiff
path: root/arm/PrintAsm.ml
diff options
context:
space:
mode:
authorGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2009-04-17 13:27:48 +0000
committerGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2009-04-17 13:27:48 +0000
commitd1cdc0496d7d52e3ab91554dbf53fcc0e7f244eb (patch)
tree4fb435a847b0a1f1fd0afc93eb718c459e2aa0d6 /arm/PrintAsm.ml
parented39cb168c0ca6c979db9059d39213d4f2a59eb5 (diff)
Various clean-ups
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1033 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'arm/PrintAsm.ml')
-rw-r--r--arm/PrintAsm.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/arm/PrintAsm.ml b/arm/PrintAsm.ml
index f51a15b..da0b5d1 100644
--- a/arm/PrintAsm.ml
+++ b/arm/PrintAsm.ml
@@ -178,8 +178,7 @@ let call_helper oc fn dst arg1 arg2 =
(* Move result to dst *)
begin match dst with
| IR0 -> ()
- | _ ->
- fprintf oc " mov %a, r0\n" ireg dst
+ | _ -> fprintf oc " mov %a, r0\n" ireg dst
end;
(* Restore the other caller-save registers *)
fprintf oc " ldmfd sp!, {%a}\n" print_list_ireg tosave;