aboutsummaryrefslogtreecommitdiffstats
path: root/ia32
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2015-10-15 09:10:22 +0200
committerBernhard Schommer <bernhardschommer@gmail.com>2015-10-15 09:10:22 +0200
commit44845982f412810b0c18067987f2780ef6245fbb (patch)
tree9ca5afb4851a726229251415d977abf296f68f5e /ia32
parentdf78560fdf859644274dbdabccdd1fdb9e75634e (diff)
downloadcompcert-44845982f412810b0c18067987f2780ef6245fbb.tar.gz
compcert-44845982f412810b0c18067987f2780ef6245fbb.zip
Use section type also for other targets.
Bug 17392.
Diffstat (limited to 'ia32')
-rw-r--r--ia32/TargetPrinter.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/ia32/TargetPrinter.ml b/ia32/TargetPrinter.ml
index 1ccfdcba..bd0c1d95 100644
--- a/ia32/TargetPrinter.ml
+++ b/ia32/TargetPrinter.ml
@@ -757,7 +757,7 @@ module Target(System: SYSTEM):TARGET =
if !Clflags.option_g then begin
section oc Section_text;
let low_pc = new_label () in
- Debug.add_compilation_section_start ".text" low_pc;
+ Debug.add_compilation_section_start Section_text low_pc;
fprintf oc "%a:\n" elf_label low_pc;
fprintf oc " .cfi_sections .debug_frame\n"
end
@@ -779,7 +779,7 @@ module Target(System: SYSTEM):TARGET =
System.print_epilogue oc;
if !Clflags.option_g then begin
let high_pc = new_label () in
- Debug.add_compilation_section_end ".text" high_pc;
+ Debug.add_compilation_section_end Section_text high_pc;
Debug.compute_gnu_file_enum (fun f -> ignore (print_file oc f));
section oc Section_text;
fprintf oc "%a:\n" elf_label high_pc