diff options
| author | Bernhard Schommer <bschommer@users.noreply.github.com> | 2015-09-30 12:45:40 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bschommer@users.noreply.github.com> | 2015-09-30 12:45:40 +0200 |
| commit | e443d76ad1ee0182353404317ab45c26227a59ea (patch) | |
| tree | 1c110864431d8f6ba06c8746233397a3e221560e /arm | |
| parent | c212ab7a8adea516db72f17d818393629dbde1b3 (diff) | |
| parent | ee76d81e0e7d8a76cd31bf0d01a532d248dca45a (diff) | |
| download | compcert-e443d76ad1ee0182353404317ab45c26227a59ea.tar.gz compcert-e443d76ad1ee0182353404317ab45c26227a59ea.zip | |
Merge pull request #56 from AbsInt/debug_locations
Debug locations
Diffstat (limited to 'arm')
| -rw-r--r-- | arm/TargetPrinter.ml | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/arm/TargetPrinter.ml b/arm/TargetPrinter.ml index f7f0d313..86f9f973 100644 --- a/arm/TargetPrinter.ml +++ b/arm/TargetPrinter.ml @@ -152,7 +152,8 @@ module Target (Opt: PRINTER_OPTIONS) : TARGET = | Section_user(s, wr, ex) -> sprintf ".section \"%s\",\"a%s%s\",%%progbits" s (if wr then "w" else "") (if ex then "x" else "") - | Section_debug_info + | Section_debug_info _ + | Section_debug_loc | Section_debug_abbrev -> "" (* Dummy value *) let section oc sec = @@ -905,9 +906,9 @@ module Target (Opt: PRINTER_OPTIONS) : TARGET = let get_end_addr () = -1 (* Dummy constant *) let get_stmt_list_addr () = -1 (* Dummy constant *) - - module DwarfAbbrevs = DwarfUtil.DefaultAbbrevs (* Dummy Abbrev types *) + let get_debug_start_addr () = -1 (* Dummy constant *) + let label = elf_label let new_label = new_label |