tcl global directive outside proc body does nothing (ld)

[deliverable/binutils-gdb.git] / ld / testsuite / ld-powerpc / export-class.exp

diff --git a/ld/testsuite/ld-powerpc/export-class.exp b/ld/testsuite/ld-powerpc/export-class.exp
index e244be329051e90e583083855015e29b171ed6fd..884c4ebd79abd04ecf3fa7ea436a23f1e57f5794 100644 (file)
--- a/ld/testsuite/ld-powerpc/export-class.exp
+++ b/ld/testsuite/ld-powerpc/export-class.exp
@@ -87,7 +87,6 @@ proc powerpc_export_class_test { abi endian emul } {
 
 set abis { 32 be elf32ppclinux 32 le elf32lppclinux 64 be elf64ppc 64 le elf64lppc }
 
-global ld
 catch "exec $ld --help | grep emulations" ldemul
 
 foreach { abi endian emul } $abis {