aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2010-03-30 12:10:07 +0000
committerxleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2010-03-30 12:10:07 +0000
commit40141e6651bf02ef56d35bd6b3e64e4445d1593f (patch)
treee2b5929ae5715f8b41d1666c652446a38ce98dae
parent11409781d99e934dc1cd7d27e397c55faab5792b (diff)
downloadcompcert-40141e6651bf02ef56d35bd6b3e64e4445d1593f.tar.gz
compcert-40141e6651bf02ef56d35bd6b3e64e4445d1593f.zip
Updated Linux conventions
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1301 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
-rw-r--r--powerpc/PrintAsm.ml9
1 files changed, 6 insertions, 3 deletions
diff --git a/powerpc/PrintAsm.ml b/powerpc/PrintAsm.ml
index c2964cd4..31143fbb 100644
--- a/powerpc/PrintAsm.ml
+++ b/powerpc/PrintAsm.ml
@@ -94,7 +94,8 @@ let label_high oc lbl =
let comment =
match target with
- | MacOS|Linux -> ";"
+ | MacOS -> ";"
+ | Linux -> "#"
| Diab -> "%"
let constant oc cst =
@@ -117,10 +118,12 @@ let constant oc cst =
end
| Csymbol_sda(s, n) ->
begin match target with
+ | MacOS ->
+ assert false
+ | Linux ->
+ fprintf oc "(%a)@sda21" symbol_offset (s, camlint_of_coqint n)
| Diab ->
fprintf oc "(%a)@sdarx" symbol_offset (s, camlint_of_coqint n)
- | _ ->
- assert false
end
let num_crbit = function