diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-03-16 12:23:29 +0100 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-03-16 12:23:29 +0100 |
| commit | b3c67667b7121b7f2e50700ec6da4bd780dee426 (patch) | |
| tree | fbd6cfe3b6cfda555ca9389e58a2b226df480013 /backend/PrintAsmaux.ml | |
| parent | a84576b219c797467e480508fc99ba78260062df (diff) | |
| download | compcert-kvx-b3c67667b7121b7f2e50700ec6da4bd780dee426.tar.gz compcert-kvx-b3c67667b7121b7f2e50700ec6da4bd780dee426.zip | |
Started implementing the printing functions for the debug info. Added a global target dependend option to activate the printing only for targets wher it works.
Diffstat (limited to 'backend/PrintAsmaux.ml')
| -rw-r--r-- | backend/PrintAsmaux.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/backend/PrintAsmaux.ml b/backend/PrintAsmaux.ml index aa0f4214..8bc961ef 100644 --- a/backend/PrintAsmaux.ml +++ b/backend/PrintAsmaux.ml @@ -14,6 +14,7 @@ open AST open Asm open Camlcoq +open DwarfTypes open Datatypes open Printf open Sections @@ -46,6 +47,10 @@ module type TARGET = val get_start_addr: unit -> int val get_end_addr: unit -> int val get_stmt_list_addr: unit -> int + val new_label: unit -> int + val label: out_channel -> int -> unit + val print_file_loc: out_channel -> file_loc -> unit + module DwarfAbbrevs: DWARF_ABBREVS end (* On-the-fly label renaming *) |