diff options
author | Ben Elliston <bje@gnu.org> | 2018-12-09 18:41:26 +1100 |
---|---|---|
committer | Ben Elliston <bje@gnu.org> | 2018-12-09 18:41:26 +1100 |
commit | e2fb9266669c87021ce666f8dca81ab2d96635d1 (patch) | |
tree | 5671da3e54579106914421e932611f057eedc78d /lib/target.exp | |
parent | 115a81dab7063ea3b806bfbac87845e32d8ca5ad (diff) | |
download | dejagnu-e2fb9266669c87021ce666f8dca81ab2d96635d1.zip dejagnu-e2fb9266669c87021ce666f8dca81ab2d96635d1.tar.gz dejagnu-e2fb9266669c87021ce666f8dca81ab2d96635d1.tar.bz2 |
* baseboards/basic-sid.exp, baseboards/basic-sim.exp,
baseboards/i386-sid.exp, baseboards/mt-sid.exp,
baseboards/sh-sid.exp, config/adb.exp, config/gdb-comm.exp,
config/gdb_stub.exp, config/sim.exp, config/unix.exp,
config/vxworks.exp, lib/dejagnu.exp, lib/dg.exp,
lib/framework.exp, lib/kermit.exp, lib/libgloss.exp,
lib/remote.exp, lib/rsh.exp, lib/target.exp, lib/tip.exp,
lib/utils.exp, testsuite/lib/libsup.exp,
testsuite/runtest.all/options.exp,: Remove unnecessary braces
around variable expansions.
Diffstat (limited to 'lib/target.exp')
-rw-r--r-- | lib/target.exp | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/target.exp b/lib/target.exp index b818d92..d550a07 100644 --- a/lib/target.exp +++ b/lib/target.exp @@ -94,8 +94,8 @@ proc push_config { type name } { proc pop_config { type } { global target_info - if {[info exists target_info(${type},name)]} { - unset target_info(${type},name) + if {[info exists target_info($type,name)]} { + unset target_info($type,name) } } @@ -527,7 +527,7 @@ proc default_target_compile {source destfile type options} { if {[isnative]} { # This is a lose. catch "glob -nocomplain $tool_root_dir/libstdc++/libstdc++.so* $tool_root_dir/libstdc++/libstdc++.sl" tmp - if { ${tmp} ne "" } { + if { $tmp ne "" } { if {[regexp ".*solaris2.*" $target_triplet]} { # Solaris 2 append add_flags " -R$tool_root_dir/libstdc++" @@ -676,13 +676,13 @@ proc default_target_compile {source destfile type options} { if { [lindex $status 0] != 0 && $comp_output eq "" } { set comp_output "exit status is [lindex $status 0]" } - return ${comp_output} + return $comp_output } proc reboot_target { } { set result [remote_reboot target] puts "REBOOT_TARGET: \"$result\"" - return ${result} + return $result } # Invoke this if you really want as to be called directly, rather than @@ -729,7 +729,7 @@ proc default_target_assemble { source destfile flags } { if { [lindex $status 1] ne "" } { verbose "assembler output is:\n[lindex $status 1]" 2 } - return ${comp_output} + return $comp_output } # Invoke this if you really want ld to be called directly, rather than @@ -821,5 +821,5 @@ proc default_link { board objects destfile flags } { if { [lindex $status 1] ne "" } { verbose "linker output is:\n[lindex $status 1]" 2 } - return ${comp_output} + return $comp_output } |