From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 2153) id AD3153839802; Wed, 11 May 2022 06:22:05 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org AD3153839802 MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset="utf-8" From: Jakub Jelinek To: gcc-cvs@gcc.gnu.org Subject: [gcc r9-10097] dwarf2out: Emit DW_AT_location for global register vars during early dwarf [PR101905] X-Act-Checkin: gcc X-Git-Author: Jakub Jelinek X-Git-Refname: refs/heads/releases/gcc-9 X-Git-Oldrev: cbf39efadbc9f07b639856f1ee367e3756f8df99 X-Git-Newrev: 6aa2e07b4134bceefe0b8be5cecfe11119466181 Message-Id: <20220511062205.AD3153839802@sourceware.org> Date: Wed, 11 May 2022 06:22:05 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 11 May 2022 06:22:05 -0000 https://gcc.gnu.org/g:6aa2e07b4134bceefe0b8be5cecfe11119466181 commit r9-10097-g6aa2e07b4134bceefe0b8be5cecfe11119466181 Author: Jakub Jelinek Date: Mon Aug 23 11:50:14 2021 +0200 dwarf2out: Emit DW_AT_location for global register vars during early dwarf [PR101905] The following patch emits DW_AT_location for global register variables already during early dwarf, since usually late_global_decl hook isn't even called for those, as nothing needs to be emitted for them. 2021-08-23 Jakub Jelinek PR debug/101905 * dwarf2out.c (gen_variable_die): Add DW_AT_location for global register variables already during early_dwarf if possible. * gcc.dg/guality/pr101905.c: New test. (cherry picked from commit b284053bb75661fc1bf13c275f3ba5364bb17608) Diff: --- gcc/dwarf2out.c | 21 ++++++++++++++++++++- gcc/testsuite/gcc.dg/guality/pr101905.c | 15 +++++++++++++++ 2 files changed, 35 insertions(+), 1 deletion(-) diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c index 5dc6171284c..6c766308250 100644 --- a/gcc/dwarf2out.c +++ b/gcc/dwarf2out.c @@ -24023,7 +24023,26 @@ gen_variable_die (tree decl, tree origin, dw_die_ref context_die) && DECL_RTL_SET_P (decl_or_origin)))) { if (early_dwarf) - add_pubname (decl_or_origin, var_die); + { + add_pubname (decl_or_origin, var_die); + /* For global register variables, emit DW_AT_location if possible + already during early_dwarf, as late_global_decl won't be usually + called. */ + if (DECL_HARD_REGISTER (decl_or_origin) + && TREE_STATIC (decl_or_origin) + && !decl_by_reference_p (decl_or_origin) + && !get_AT (var_die, DW_AT_location) + && !get_AT (var_die, DW_AT_const_value) + && DECL_RTL_SET_P (decl_or_origin) + && REG_P (DECL_RTL (decl_or_origin))) + { + dw_loc_descr_ref descr + = reg_loc_descriptor (DECL_RTL (decl_or_origin), + VAR_INIT_STATUS_INITIALIZED); + if (descr) + add_AT_loc (var_die, DW_AT_location, descr); + } + } else add_location_or_const_value_attribute (var_die, decl_or_origin, decl == NULL); diff --git a/gcc/testsuite/gcc.dg/guality/pr101905.c b/gcc/testsuite/gcc.dg/guality/pr101905.c new file mode 100644 index 00000000000..71b7516905b --- /dev/null +++ b/gcc/testsuite/gcc.dg/guality/pr101905.c @@ -0,0 +1,15 @@ +/* { dg-do run { target { { i?86-*-* x86_64-*-* } && lp64 } } } */ +/* { dg-options "-g -ffixed-r15" } */ +/* { dg-skip-if "" { *-*-* } { "*" } { "-O0" } } */ + +register unsigned long long regVar asm ("r15"); + +int +main() +{ + regVar = 0xdeadbeefcafebabeULL; + asm ("nop" : "+r" (regVar)); + asm volatile ("nop"); /* { dg-final { gdb-test . "regVar" "0xdeadbeefcafebabeULL" } } */ + asm volatile ("nop" : : "r" (regVar)); + return 0; +}