diff options
| author | Pierre-Marie de Rodat <derodat@adacore.com> | 2015-11-26 14:56:24 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2015-11-26 14:56:24 +0000 |
| commit | ed881c38adb627c7b8ed10d98f6937834ef90d43 (patch) | |
| tree | 26e86a526df43e3c7ee7962c8e476e804f433978 /gcc/dwarf2out.c | |
| parent | 09c5c12e560b7804b14f599e858929787193da30 (diff) | |
| download | gcc-ed881c38adb627c7b8ed10d98f6937834ef90d43.zip gcc-ed881c38adb627c7b8ed10d98f6937834ef90d43.tar.gz gcc-ed881c38adb627c7b8ed10d98f6937834ef90d43.tar.bz2 | |
DWARF: fix loc. descr. generation for DW_AT_static_link
gcc/ChangeLog:
PR debug/53927
* tree-nested.c (finalize_nesting_tree_1): Append a field to
hold the frame base address.
* dwarf2out.c (gen_subprogram_die): Generate for
DW_AT_static_link a location description that computes the value
of this field.
From-SVN: r230968
Diffstat (limited to 'gcc/dwarf2out.c')
| -rw-r--r-- | gcc/dwarf2out.c | 20 |
1 files changed, 17 insertions, 3 deletions
diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c index d46a671..add2204 100644 --- a/gcc/dwarf2out.c +++ b/gcc/dwarf2out.c @@ -19113,9 +19113,23 @@ gen_subprogram_die (tree decl, dw_die_ref context_die) compute_frame_pointer_to_fb_displacement (cfa_fb_offset); if (fun->static_chain_decl) - add_AT_location_description - (subr_die, DW_AT_static_link, - loc_list_from_tree (fun->static_chain_decl, 2, NULL)); + { + /* DWARF requires here a location expression that computes the + address of the enclosing subprogram's frame base. The machinery + in tree-nested.c is supposed to store this specific address in the + last field of the FRAME record. */ + const tree frame_type + = TREE_TYPE (TREE_TYPE (fun->static_chain_decl)); + const tree fb_decl = tree_last (TYPE_FIELDS (frame_type)); + + tree fb_expr + = build1 (INDIRECT_REF, frame_type, fun->static_chain_decl); + fb_expr = build3 (COMPONENT_REF, TREE_TYPE (fb_decl), + fb_expr, fb_decl, NULL_TREE); + + add_AT_location_description (subr_die, DW_AT_static_link, + loc_list_from_tree (fb_expr, 0, NULL)); + } } /* Generate child dies for template paramaters. */ |