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

1 files changed, 3 insertions, 0 deletions

diff --git a/powerpc/PrintAsm.ml b/powerpc/PrintAsm.ml
index 335a6cf..3c8d82b 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;