diff options
author | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-10-25 16:31:58 +0200 |
---|---|---|
committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-10-25 16:31:58 +0200 |
commit | f2d6637c7d4a11f961ff289e64f70bf4de93d0aa (patch) | |
tree | 43b9ead4ff02e1ad6a1ffef9449ca081391523cb | |
parent | 755ceeb9476f96c5d07f27edd1b26b5f183ec9f5 (diff) | |
download | compcert-f2d6637c7d4a11f961ff289e64f70bf4de93d0aa.tar.gz compcert-f2d6637c7d4a11f961ff289e64f70bf4de93d0aa.zip |
macosx needs all strings in degub_str.
-rw-r--r-- | debug/Dwarfgen.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/debug/Dwarfgen.ml b/debug/Dwarfgen.ml index 3c75b3dc..617c4570 100644 --- a/debug/Dwarfgen.ml +++ b/debug/Dwarfgen.ml @@ -578,7 +578,8 @@ let gnu_file_loc (f,l) = let string_table: (string,int) Hashtbl.t = Hashtbl.create 7 let gnu_string_entry s = - if String.length s < 4 || Configuration.system = "cygwin" then (*Cygwin does not use the debug_str seciton *) + if (String.length s < 4 && Configuration.system <> "macosx") (* macosx needs debug_str *) + || Configuration.system = "cygwin" then (*Cygwin does not use the debug_str seciton*) Simple_string s else try |