aboutsummaryrefslogtreecommitdiffstats
path: root/powerpc/TargetPrinter.ml
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2015-10-04 22:15:20 +0200
committerBernhard Schommer <bernhardschommer@gmail.com>2015-10-04 22:15:20 +0200
commit34cc6a603f34a430fc3b9a7071dcc1e19b2b7250 (patch)
tree2bc811f0893b7925164f70e0b284ea6061aca36c /powerpc/TargetPrinter.ml
parent57fceab9ba11cb98635236f31c85ca976ca7f48c (diff)
downloadcompcert-kvx-34cc6a603f34a430fc3b9a7071dcc1e19b2b7250.tar.gz
compcert-kvx-34cc6a603f34a430fc3b9a7071dcc1e19b2b7250.zip
Ensure that there are file directives for all files used in the debug
information.
Diffstat (limited to 'powerpc/TargetPrinter.ml')
-rw-r--r--powerpc/TargetPrinter.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/powerpc/TargetPrinter.ml b/powerpc/TargetPrinter.ml
index 579573b9..530e269d 100644
--- a/powerpc/TargetPrinter.ml
+++ b/powerpc/TargetPrinter.ml
@@ -161,6 +161,7 @@ module Linux_System : SYSTEM =
begin
let high_pc = new_label () in
Debug.add_compilation_section_end ".text" high_pc;
+ Debug.compute_gnu_file_enum (fun f -> ignore (print_file oc f));
section oc Section_text;
fprintf oc "%a:\n" label high_pc
end
@@ -286,7 +287,7 @@ module Diab_System : SYSTEM =
fprintf oc ".L%d: .d2filenum \"%s\"\n" label f;
label
and end_line () = fprintf oc " .d2_line_end\n" in
- Debug.compute_file_enum end_label entry_label end_line
+ Debug.compute_diab_file_enum end_label entry_label end_line
end