diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2009-11-01 09:55:35 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2009-11-01 09:55:35 +0000 |
commit | 033aa0555a209fa3e825b1eeb8a5fc00ff8163e3 (patch) | |
tree | b107715bdfd95d6aa1080e96cc5b919bb94ae3fb /powerpc/PrintAsm.ml | |
parent | 258a1feeafb9ebcec4d46601fe7016bed04a8ea7 (diff) | |
download | compcert-033aa0555a209fa3e825b1eeb8a5fc00ff8163e3.tar.gz compcert-033aa0555a209fa3e825b1eeb8a5fc00ff8163e3.zip |
Support Clight initializers of the form "int * x = &y;".
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1162 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'powerpc/PrintAsm.ml')
-rw-r--r-- | powerpc/PrintAsm.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/powerpc/PrintAsm.ml b/powerpc/PrintAsm.ml index 335a6cf2..3c8d82bc 100644 --- a/powerpc/PrintAsm.ml +++ b/powerpc/PrintAsm.ml @@ -656,6 +656,9 @@ let print_init oc = function | Init_space n -> let n = camlint_of_z n in if n > 0l then fprintf oc " .space %ld\n" n + | Init_addrof(symb, ofs) -> + fprintf oc " .long %a\n" + symbol_offset (symb, camlint_of_coqint ofs) | Init_pointer id -> let lbl = new_label() in fprintf oc " .long %a\n" label lbl; |