diff options
author | Ben Elliston <bje@gnu.org> | 2018-12-06 18:05:05 +1100 |
---|---|---|
committer | Ben Elliston <bje@gnu.org> | 2018-12-06 18:05:05 +1100 |
commit | d439887f64b9c7c146d9a9062b459d08c43f2a12 (patch) | |
tree | 2a2921cdef799eb805e6ec027ed258bbf72deec3 /runtest.exp | |
parent | a8e4dbd2a65255a1470962994b2888fc8ee3b9bc (diff) | |
download | dejagnu-d439887f64b9c7c146d9a9062b459d08c43f2a12.zip dejagnu-d439887f64b9c7c146d9a9062b459d08c43f2a12.tar.gz dejagnu-d439887f64b9c7c146d9a9062b459d08c43f2a12.tar.bz2 |
* runtest.exp: Replace [string match] commands involving literal
strings and variables known to not be Tcl glob patterns with eq
and ne.
* config/unix.exp: Likewise.
* lib/debugger.exp: Likewise.
* lib/dg.exp: Likewise.
* lib/framework.exp: Likewise.
* lib/remote.exp: Likewise.
* lib/utils.exp: Likewise.
* baseboards/androideabi.exp: Likewise.
* baseboards/multi-sim.exp: Likewise.
* testsuite/lib/util-defs.exp: Likewise.
* testsuite/runtest.all/config.test: Likewise.
Diffstat (limited to 'runtest.exp')
-rw-r--r-- | runtest.exp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/runtest.exp b/runtest.exp index 4657bd7..1fa36fe 100644 --- a/runtest.exp +++ b/runtest.exp @@ -1727,8 +1727,8 @@ foreach current_target $target_list { set temp_top_dirs "" set prev_dir "" foreach dir "${test_top_dirs}" { - if { [string length ${prev_dir}] == 0 || - [string first "${prev_dir}/" ${dir}] == -1} { + if {$prev_dir eq "" || \ + [string first "${prev_dir}/" ${dir}] == -1} { # the first top dir entry, or an entry that # does not share the previous entry's entire # pathname, record it as a valid top dir entry. |