diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-10-02 11:10:39 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-10-02 11:10:39 +0200 |
| commit | 007ed4b93ac06e9cd5cf3107008f13df19f580f0 (patch) | |
| tree | ee6ee065719470cd99c1e69a85a9f11a4d3d80b2 /debug | |
| parent | 13b1d1fbe9408659c278696fb6a0eb2f213ea78f (diff) | |
| download | compcert-kvx-007ed4b93ac06e9cd5cf3107008f13df19f580f0.tar.gz compcert-kvx-007ed4b93ac06e9cd5cf3107008f13df19f580f0.zip | |
Add also all files for local variables.
Diffstat (limited to 'debug')
| -rw-r--r-- | debug/DebugInformation.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/debug/DebugInformation.ml b/debug/DebugInformation.ml index 9100e60b..6046f894 100644 --- a/debug/DebugInformation.ml +++ b/debug/DebugInformation.ml @@ -521,6 +521,7 @@ let add_lvar_scope f_id var_id s_id = with Not_found -> () let insert_local_declaration sto id ty loc = + add_file (fst loc); let ty = insert_type ty in let var = { lvar_name = id.name; |