diff options
author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-11-04 18:21:19 +0100 |
---|---|---|
committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-11-04 18:21:19 +0100 |
commit | cbff6d5b0f84090e2ff7f74bfb6eb7f3e3a29ef9 (patch) | |
tree | 931d9c3ac1022685525f5c0c75461d2d0d158aa2 /driver | |
parent | 738c07062ea0708fc9208318933fda16fd696cc0 (diff) | |
download | compcert-cbff6d5b0f84090e2ff7f74bfb6eb7f3e3a29ef9.tar.gz compcert-cbff6d5b0f84090e2ff7f74bfb6eb7f3e3a29ef9.zip |
New option to control the debug information build.
The new option -gonly-global allows the generation of debuging
information for global variables only.
Bug 17566.
Diffstat (limited to 'driver')
-rw-r--r-- | driver/Clflags.ml | 1 | ||||
-rw-r--r-- | driver/Driver.ml | 2 |
2 files changed, 3 insertions, 0 deletions
diff --git a/driver/Clflags.ml b/driver/Clflags.ml index b0c24f08..1eaa5449 100644 --- a/driver/Clflags.ml +++ b/driver/Clflags.ml @@ -47,6 +47,7 @@ let option_dasm = ref false let option_sdump = ref false let option_g = ref false let option_gdwarf = ref 2 +let option_gglobal = ref false let option_o = ref (None: string option) let option_E = ref false let option_S = ref false diff --git a/driver/Driver.ml b/driver/Driver.ml index a0d742c2..59e3fa3b 100644 --- a/driver/Driver.ml +++ b/driver/Driver.ml @@ -435,6 +435,7 @@ Language support options (use -fno-<opt> to turn off -f<opt>) : Debugging options: -g Generate debugging information -gdwarf- (GCC only) Generate debug information in DWARF v2 or DWARF v3 + -gonly-global Generate debugging information only for globals -frename-static Rename static functions and declarations Optimization options: (use -fno-<opt> to turn off -f<opt>) -O Optimize the compiled code [on by default] @@ -547,6 +548,7 @@ let cmdline_actions = Exact "-gdwarf-3", Self (fun s -> option_g := true; option_gdwarf := 3); Exact "-frename-static", Self (fun s -> option_rename_static:= true); + Exact "-gonly-global", Self (fun s -> option_gglobal := true); (* Code generation options -- more below *) Exact "-O0", Self (fun _ -> unset_all optimization_options); Exact "-O", Self (fun _ -> set_all optimization_options); |