From: Tom de Vries <tdevries@suse.de>
To: gdb-patches@sourceware.org
Subject: [committed][gdb/testsuite] Remove Dwarf::extern
Date: Fri, 17 Jul 2020 13:07:07 +0200 [thread overview]
Message-ID: <20200717110706.GA5585@delia> (raw)
Hi,
The file lib/dwarf.exp contains:
...
# Declare a global label. This is typically used to refer to
# labels defined in other files, for example a function defined in
# a .c file.
proc extern {args} {
foreach name $args {
_op .global $name
}
}
...
The assembler directive to refer to labels defined in other files is
not .global, but .extern, and that one is ignored by gas.
Since we require gas for all dwarf assembly test-cases, remove the proc and
all it's uses.
Tested on x86_64-linux.
Committed to trunk.
Thanks,
- Tom
[gdb/testsuite] Remove Dwarf::extern
gdb/testsuite/ChangeLog:
2020-07-17 Tom de Vries <tdevries@suse.de>
* lib/dwarf.exp (Dwarf::extern): Remove.
* gdb.compile/compile-ops.exp: Remove use of Dwarf::extern.
* gdb.dlang/circular.exp: Same.
* gdb.dwarf2/comp-unit-lang.exp: Same.
* gdb.dwarf2/dw2-ifort-parameter.exp: Same.
* gdb.dwarf2/dw2-symtab-includes.exp: Same.
* gdb.dwarf2/dwz.exp: Same.
* gdb.dwarf2/imported-unit-abstract-const-value.exp: Same.
* gdb.dwarf2/imported-unit-runto-main.exp: Same.
* gdb.dwarf2/imported-unit.exp: Same.
* gdb.dwarf2/opaque-type-lookup.exp: Same.
---
gdb/testsuite/gdb.compile/compile-ops.exp | 1 -
gdb/testsuite/gdb.dlang/circular.exp | 2 --
gdb/testsuite/gdb.dwarf2/comp-unit-lang.exp | 2 --
gdb/testsuite/gdb.dwarf2/dw2-ifort-parameter.exp | 1 -
gdb/testsuite/gdb.dwarf2/dw2-symtab-includes.exp | 2 --
gdb/testsuite/gdb.dwarf2/dwz.exp | 2 --
gdb/testsuite/gdb.dwarf2/imported-unit-abstract-const-value.exp | 2 --
gdb/testsuite/gdb.dwarf2/imported-unit-runto-main.exp | 2 --
gdb/testsuite/gdb.dwarf2/imported-unit.exp | 3 ---
gdb/testsuite/gdb.dwarf2/opaque-type-lookup.exp | 2 --
gdb/testsuite/lib/dwarf.exp | 9 ---------
11 files changed, 28 deletions(-)
diff --git a/gdb/testsuite/gdb.compile/compile-ops.exp b/gdb/testsuite/gdb.compile/compile-ops.exp
index d9aee413a6..7c801d932c 100644
--- a/gdb/testsuite/gdb.compile/compile-ops.exp
+++ b/gdb/testsuite/gdb.compile/compile-ops.exp
@@ -362,7 +362,6 @@ Dwarf::assemble $asm_file {
cu { addr_size 4 } {
declare_labels int_label
- extern func_start func_end ptr
compile_unit {
{name file1.txt}
diff --git a/gdb/testsuite/gdb.dlang/circular.exp b/gdb/testsuite/gdb.dlang/circular.exp
index f3d8f60469..1e04370478 100644
--- a/gdb/testsuite/gdb.dlang/circular.exp
+++ b/gdb/testsuite/gdb.dlang/circular.exp
@@ -37,8 +37,6 @@ Dwarf::assemble $asm_file {
declare_labels circular1_label circular2_label circular3_label
declare_labels circular4_label circular5_label
- extern circular1_found_start circular1_found_end
-
circular1_label: module {
{name circular1}
} {
diff --git a/gdb/testsuite/gdb.dwarf2/comp-unit-lang.exp b/gdb/testsuite/gdb.dwarf2/comp-unit-lang.exp
index 8ff6b733cc..2ebe6caedc 100644
--- a/gdb/testsuite/gdb.dwarf2/comp-unit-lang.exp
+++ b/gdb/testsuite/gdb.dwarf2/comp-unit-lang.exp
@@ -42,8 +42,6 @@ proc do_test {cu_lang gdb_lang} {
# Creating a CU with 4-byte addresses lets this test link on
# both 32- and 64-bit machines.
cu { addr_size 4 } {
- extern func_start func_end
-
compile_unit {
{name file1.txt}
{language @$cu_lang}
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-ifort-parameter.exp b/gdb/testsuite/gdb.dwarf2/dw2-ifort-parameter.exp
index 75f17c5192..2388ce53f6 100644
--- a/gdb/testsuite/gdb.dwarf2/dw2-ifort-parameter.exp
+++ b/gdb/testsuite/gdb.dwarf2/dw2-ifort-parameter.exp
@@ -29,7 +29,6 @@ set asm_file [standard_output_file $srcfile2]
Dwarf::assemble $asm_file {
declare_labels int_label
- extern func_start func_end ptr
global srcdir subdir srcfile
cu {} {
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-symtab-includes.exp b/gdb/testsuite/gdb.dwarf2/dw2-symtab-includes.exp
index 1eaaf4af4f..e10e413035 100644
--- a/gdb/testsuite/gdb.dwarf2/dw2-symtab-includes.exp
+++ b/gdb/testsuite/gdb.dwarf2/dw2-symtab-includes.exp
@@ -31,8 +31,6 @@ Dwarf::assemble $asm_file {
declare_labels partial_label lines_label
global srcdir subdir srcfile
- extern main
-
cu {} {
partial_label: partial_unit {} {
}
diff --git a/gdb/testsuite/gdb.dwarf2/dwz.exp b/gdb/testsuite/gdb.dwarf2/dwz.exp
index b9987ed0d1..9f5eda5e38 100644
--- a/gdb/testsuite/gdb.dwarf2/dwz.exp
+++ b/gdb/testsuite/gdb.dwarf2/dwz.exp
@@ -28,8 +28,6 @@ Dwarf::assemble $asm_file {
declare_labels partial_label int_label int_label2
global srcdir subdir srcfile
- extern main
-
cu {} {
partial_label: partial_unit {} {
subprogram {
diff --git a/gdb/testsuite/gdb.dwarf2/imported-unit-abstract-const-value.exp b/gdb/testsuite/gdb.dwarf2/imported-unit-abstract-const-value.exp
index f93dc12388..13a7e97cc5 100644
--- a/gdb/testsuite/gdb.dwarf2/imported-unit-abstract-const-value.exp
+++ b/gdb/testsuite/gdb.dwarf2/imported-unit-abstract-const-value.exp
@@ -42,8 +42,6 @@ Dwarf::assemble $asm_file {
global srcdir subdir srcfile
- extern main
-
set main_range [function_range main ${srcdir}/${subdir}/${srcfile}]
set main_start [lindex $main_range 0]
set main_length [lindex $main_range 1]
diff --git a/gdb/testsuite/gdb.dwarf2/imported-unit-runto-main.exp b/gdb/testsuite/gdb.dwarf2/imported-unit-runto-main.exp
index 2794684053..8a05ee8527 100644
--- a/gdb/testsuite/gdb.dwarf2/imported-unit-runto-main.exp
+++ b/gdb/testsuite/gdb.dwarf2/imported-unit-runto-main.exp
@@ -39,8 +39,6 @@ Dwarf::assemble $asm_file {
global srcdir subdir srcfile
- extern main
-
set main_range [function_range main ${srcdir}/${subdir}/${srcfile}]
set main_start [lindex $main_range 0]
set main_length [lindex $main_range 1]
diff --git a/gdb/testsuite/gdb.dwarf2/imported-unit.exp b/gdb/testsuite/gdb.dwarf2/imported-unit.exp
index 32a9abf620..dba87ffcb2 100644
--- a/gdb/testsuite/gdb.dwarf2/imported-unit.exp
+++ b/gdb/testsuite/gdb.dwarf2/imported-unit.exp
@@ -56,9 +56,6 @@ Dwarf::assemble $asm_file {
global srcdir subdir srcfile
- extern main
- extern doit
-
set main_range [function_range main ${srcdir}/${subdir}/${srcfile}]
set main_start [lindex $main_range 0]
set main_length [lindex $main_range 1]
diff --git a/gdb/testsuite/gdb.dwarf2/opaque-type-lookup.exp b/gdb/testsuite/gdb.dwarf2/opaque-type-lookup.exp
index 60d67b1bda..19316ef7eb 100644
--- a/gdb/testsuite/gdb.dwarf2/opaque-type-lookup.exp
+++ b/gdb/testsuite/gdb.dwarf2/opaque-type-lookup.exp
@@ -34,8 +34,6 @@ Dwarf::assemble $asm_file {
declare_labels char_type1_label char_type2_label
global srcdir subdir srcfile
- extern main
-
# The partial units are laid out so we're not dependent on the order that
# they appear in compunit_symtab.includes. We need the one with the
# opaque definition to appear first to gdb, so we put it in the middle.
diff --git a/gdb/testsuite/lib/dwarf.exp b/gdb/testsuite/lib/dwarf.exp
index 21dc0f62d4..f745b2ae31 100644
--- a/gdb/testsuite/lib/dwarf.exp
+++ b/gdb/testsuite/lib/dwarf.exp
@@ -822,15 +822,6 @@ namespace eval Dwarf {
_emit "${name}:"
}
- # Declare a global label. This is typically used to refer to
- # labels defined in other files, for example a function defined in
- # a .c file.
- proc extern {args} {
- foreach name $args {
- _op .global $name
- }
- }
-
# A higher-level interface to label handling.
#
# ARGS is a list of label descriptors. Each one is either a
reply other threads:[~2020-07-17 11:07 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20200717110706.GA5585@delia \
--to=tdevries@suse.de \
--cc=gdb-patches@sourceware.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox