diff options
| author | Ben Elliston <bje@gnu.org> | 2003-12-03 04:24:32 +0000 |
|---|---|---|
| committer | Ben Elliston <bje@gnu.org> | 2003-12-03 04:24:32 +0000 |
| commit | 9664d9f6280dd2f5ca00dffbbdacb69f45257aa5 (patch) | |
| tree | 3eae689e51d6edb76ef540278f8d10c980070cc9 /testsuite | |
| parent | 9200a8f38eaf39c1ce05ec561a02161190e7a7bc (diff) | |
| download | dejagnu-9664d9f6280dd2f5ca00dffbbdacb69f45257aa5.tar.gz dejagnu-9664d9f6280dd2f5ca00dffbbdacb69f45257aa5.tar.bz2 dejagnu-9664d9f6280dd2f5ca00dffbbdacb69f45257aa5.zip | |
Merge from DejaGnu 1.4 branch:
* testsuite/runtest.all/utils.test: Fix a test for proc find which
assumed that "subsubfile1" would appear at the end of the returned
list. Adjust to use a more robust regular expression.
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/runtest.all/utils.test | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/testsuite/runtest.all/utils.test b/testsuite/runtest.all/utils.test index ee08306..c85d69d 100644 --- a/testsuite/runtest.all/utils.test +++ b/testsuite/runtest.all/utils.test @@ -50,10 +50,7 @@ if [string match "*/subdir2/subfile2" "[find ${srcdir}/runtest.all/topdir/subdir puts "FAILED: find, only one level deep" } -#set path ${srcdir}/runtest.all/topdir/subdir1 -#exp_test "find ${path} sub*" "Adding */subdir1/subsubdir1/subsubfile1" "find, two levels deep" - -if [string match "*/subdir1/subsubdir1/subsubfile1" "[find ${srcdir}/runtest.all/topdir/subdir1 sub*]"] { +if [regexp ".*/subdir1/subsubdir1/subsubfile1( |$)" "[find ${srcdir}/runtest.all/topdir/subdir1 sub*]"] { puts "PASSED: find, two levels deep" } else { puts "FAILED: find, two levels deep" @@ -108,11 +105,3 @@ if [info exists env(TESTRUN)] { # absolute path # psource file # diff file_1 file_2 - - - - - - - - |