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/PrintAsm.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/PrintAsm.ml')
-rw-r--r-- | backend/PrintAsm.ml | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/backend/PrintAsm.ml b/backend/PrintAsm.ml index a48bd910..a394cf8e 100644 --- a/backend/PrintAsm.ml +++ b/backend/PrintAsm.ml @@ -99,4 +99,9 @@ let print_program oc p = Target.print_prologue oc; List.iter (Printer.print_globdef oc) p.prog_defs; Target.print_epilogue oc; - PrintAnnot.close_filenames () + PrintAnnot.close_filenames (); + if !Clflags.option_g && Configuration.advanced_debug then + begin + let module DebugPrinter = DwarfPrinter(Target) in + () + end |