tcl global directive outside proc body does nothing (ld)

[deliverable/binutils-gdb.git] / ld / testsuite / ld-elf / tls_common.exp

diff --git a/ld/testsuite/ld-elf/tls_common.exp b/ld/testsuite/ld-elf/tls_common.exp
index f71e8ce9e013c911ed9bbc18be76b2f37173e3c0..3e14ccfc21565bd2719b519d4a54674d104744cf 100644 (file)
--- a/ld/testsuite/ld-elf/tls_common.exp
+++ b/ld/testsuite/ld-elf/tls_common.exp
@@ -30,13 +30,6 @@ if { ![istarget *-*-linux*]
     return
 }
 
-global as
-global ld
-global READELF
-global srcdir
-global subdir
-global link_output
-
 if { ![ld_assemble $as "--elf-stt-common=no $srcdir/$subdir/tls_common.s" tmpdir/tls_commona.o]
       || ![ld_assemble $as "--elf-stt-common=yes $srcdir/$subdir/tls_common.s" tmpdir/tls_commonb.o] } {
     unresolved "tls_common"