diff options
author | Ben Elliston <bje@gnu.org> | 2018-12-06 14:44:43 +1100 |
---|---|---|
committer | Ben Elliston <bje@gnu.org> | 2018-12-06 14:44:43 +1100 |
commit | e25f4f2080867bc7e60c18ccf60030976144a3e3 (patch) | |
tree | 05efe9bd842f5e3c6587ffb1f45aee9adc4cb8cc /lib/target.exp | |
parent | dbf1d99cb049da74a4a91a6ae1a752be0299d636 (diff) | |
download | dejagnu-e25f4f2080867bc7e60c18ccf60030976144a3e3.zip dejagnu-e25f4f2080867bc7e60c18ccf60030976144a3e3.tar.gz dejagnu-e25f4f2080867bc7e60c18ccf60030976144a3e3.tar.bz2 |
* runtest.exp: Replace '==' with 'eq' for string compares.
Likewise, replace '!=' with 'ne'. Replace a few instances of
[string length $str] == 0 with $str eq "".
* config/gdb-comm.exp: Likewise.
* lib/dg.exp: Likewise.
* lib/framework.exp: Likewise.
* lib/libgloss.exp: Likewise.
* lib/remote.exp: Likewise.
* lib/target.exp: Likewise.
* lib/utils.exp: Likewise.
Diffstat (limited to 'lib/target.exp')
-rw-r--r-- | lib/target.exp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/target.exp b/lib/target.exp index ba6253f..9268f4e 100644 --- a/lib/target.exp +++ b/lib/target.exp @@ -673,7 +673,7 @@ proc default_target_compile {source destfile type options} { if { [lindex $status 1] != "" } { verbose "output is:\n[lindex $status 1]" 2 } - if { [lindex $status 0] != 0 && "${comp_output}" == "" } { + if { [lindex $status 0] != 0 && "${comp_output}" eq "" } { set comp_output "exit status is [lindex $status 0]" } return ${comp_output} @@ -756,7 +756,7 @@ proc default_link { board objects destfile flags } { regsub "^-Wl," $arg "" arg if {[regexp "^-L" $arg]} { # Is the directory in the next arg, or part of this one? - if { "$arg" == "-L" } { + if { $arg eq "-L" } { if { $i + 1 < $len } { append result " -L [lindex $ldflags $i+1]" incr i |