diff options
author | Alan Modra <amodra@gmail.com> | 2020-01-27 10:51:52 +1030 |
---|---|---|
committer | Alan Modra <amodra@gmail.com> | 2020-01-27 22:52:15 +1030 |
commit | e3696f67abfc46dcac6c9bbe47f8e25e34b17be5 (patch) | |
tree | e241615305663b2d2fee857efefb7001014b78b1 /ld/testsuite/ld-unique | |
parent | 7568c93bf95a518797dfb2987b04911164c14a36 (diff) | |
download | fsf-binutils-gdb-e3696f67abfc46dcac6c9bbe47f8e25e34b17be5.zip fsf-binutils-gdb-e3696f67abfc46dcac6c9bbe47f8e25e34b17be5.tar.gz fsf-binutils-gdb-e3696f67abfc46dcac6c9bbe47f8e25e34b17be5.tar.bz2 |
Replace deprecated tcl case statements with switch statements
binutils/
* testsuite/lib/binutils-common.exp (big_or_little_endian): Replace
case statement with switch statement.
gas/
* testsuite/gas/all/gas.exp: Replace case statements with switch
statements.
* testsuite/gas/elf/elf.exp: Likewise.
* testsuite/gas/macros/macros.exp: Likewise.
* testsuite/lib/gas-defs.exp: Likewise.
ld/
* testsuite/ld-elfvers/vers.exp: Replace case statements with
switch statements.
* testsuite/ld-ifunc/ifunc.exp: Likewise.
* testsuite/ld-unique/unique.exp: Likewise.
Diffstat (limited to 'ld/testsuite/ld-unique')
-rw-r--r-- | ld/testsuite/ld-unique/unique.exp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ld/testsuite/ld-unique/unique.exp b/ld/testsuite/ld-unique/unique.exp index f9dd870..5457deb 100644 --- a/ld/testsuite/ld-unique/unique.exp +++ b/ld/testsuite/ld-unique/unique.exp @@ -163,8 +163,8 @@ if { $fails == 0 } { } # Check the empty object file. -case $target_triplet in { - { hppa*-*-linux* } { set expected_none {UNIX - GNU} } +switch -glob $target_triplet { + hppa*-*-linux* { set expected_none {UNIX - GNU} } default { set expected_none {UNIX - System V} } } if {! [check_osabi tmpdir/unique_empty.o $expected_none]} { |