diff options
author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-02-05 13:02:29 +0100 |
---|---|---|
committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-02-05 13:02:29 +0100 |
commit | 20ee821830467d091984ccf9ed646de7975866a7 (patch) | |
tree | 08d4243d8df2c19b224b28ff5f1945dd95658fff /backend/PrintAsmaux.ml | |
parent | f6b9815685741a76fee78dfb58e8fb8dd70db8f0 (diff) | |
download | compcert-20ee821830467d091984ccf9ed646de7975866a7.tar.gz compcert-20ee821830467d091984ccf9ed646de7975866a7.zip |
Changed the ASM printer of the powerpc to the generalized backend.
Diffstat (limited to 'backend/PrintAsmaux.ml')
-rw-r--r-- | backend/PrintAsmaux.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/backend/PrintAsmaux.ml b/backend/PrintAsmaux.ml index 75ecfa40..381ef5df 100644 --- a/backend/PrintAsmaux.ml +++ b/backend/PrintAsmaux.ml @@ -25,12 +25,12 @@ module type TARGET = val print_prologue: out_channel -> unit val print_epilogue: out_channel -> unit val print_align: out_channel -> int -> unit - val print_comm_symb: out_channel -> P.t -> int -> unit + val print_comm_symb: out_channel -> Z.t -> P.t -> int -> unit val print_var_info: bool val print_fun_info: bool val print_init: out_channel -> init_data -> unit val reset_constants: unit -> unit - val get_section_names: unit -> section_name * section_name * section_name + val get_section_names: P.t -> section_name * section_name * section_name val print_file_line: out_channel -> string -> int -> unit val print_optional_fun_info: out_channel -> unit val cfi_startproc: out_channel -> unit @@ -39,6 +39,8 @@ module type TARGET = val emit_constants: out_channel -> section_name -> unit val print_jumptable: out_channel -> section_name -> unit val section: out_channel -> section_name -> unit + val name_of_section: section_name -> string + val comment: string end (* On-the-fly label renaming *) |