Index: gdb-9.1/gdb/dwarf2read.c =================================================================== --- gdb-9.1.orig/gdb/dwarf2read.c +++ gdb-9.1/gdb/dwarf2read.c @@ -11759,6 +11759,7 @@ dwarf2_cu::setup_type_unit_groups (struc COMPUNIT_DIRNAME (cust), compunit_language (cust), 0, cust)); + list_in_scope = get_builder ()->get_file_symbols (); } return; } @@ -11810,6 +11811,7 @@ dwarf2_cu::setup_type_unit_groups (struc COMPUNIT_DIRNAME (cust), compunit_language (cust), 0, cust)); + list_in_scope = get_builder ()->get_file_symbols (); auto &file_names = line_header->file_names (); for (i = 0; i < file_names.size (); ++i) Index: gdb-9.1/gdb/testsuite/gdb.dwarf2/dw4-toplevel-types.cc =================================================================== --- /dev/null +++ gdb-9.1/gdb/testsuite/gdb.dwarf2/dw4-toplevel-types.cc @@ -0,0 +1,21 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2020 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see . */ + +struct X {} x; +struct Y {} y; +struct Z {} z; +int main() {} Index: gdb-9.1/gdb/testsuite/gdb.dwarf2/dw4-toplevel-types.exp =================================================================== --- /dev/null +++ gdb-9.1/gdb/testsuite/gdb.dwarf2/dw4-toplevel-types.exp @@ -0,0 +1,36 @@ +# Copyright 2020 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see . + +# Test dwarf4 signatured types (DW_TAG_type_unit). + +standard_testfile .cc + +# This test is intended for targets which support DWARF-4. +# Since we pass an explicit -gdwarf-4 -fdebug-types-section to the compiler, +# we let that be the test of whether the target supports it. + +if { [prepare_for_testing "failed to prepare" "${testfile}" \ + $srcfile {debug c++ additional_flags=-gdwarf-4 \ + additional_flags=-fdebug-types-section}] } { + return -1 +} + +if ![runto_main] { + return -1 +} + +gdb_test "ptype X" "type = struct X {.*" +gdb_test "ptype Y" "type = struct Y {.*" +gdb_test "ptype Z" "type = struct Z {.*"