diff options
Diffstat (limited to 'debug/CtoDwarf.ml')
| -rw-r--r-- | debug/CtoDwarf.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/debug/CtoDwarf.ml b/debug/CtoDwarf.ml index cead6099..99b77e6f 100644 --- a/debug/CtoDwarf.ml +++ b/debug/CtoDwarf.ml @@ -304,7 +304,7 @@ let glob_var_to_dwarf (s,n,t,_) gloc = variable_file_loc = (Some gloc); variable_declaration = Some at_decl; variable_external = Some ext; - variable_location = None; + variable_location = if ext then Some (LocSymbol n.name) else None; variable_name = n.name; variable_segment = None; variable_type = i; |