This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
Re: [RFA] dejagnu runtest.exp *dir_to_run
- To: Fernando Nasser <fnasser at cygnus dot com>
- Subject: Re: [RFA] dejagnu runtest.exp *dir_to_run
- From: Jimmy Guo <guo at cup dot hp dot com>
- Date: Fri, 11 Aug 2000 19:13:08 -0700 (PDT)
- Cc: Geoff Keating <geoffk at cygnus dot com>,gdb-patches at sourceware dot cygnus dot com
FYI, I've tested this patch on gdb and gcc / g++ testsuites (thanks
to Geoff Keating for helps on test instructions), seems to work fine.
- Jimmy
2000-08-07 Jimmy Guo <guo@cup.hp.com>
Re-apply this change which needn't be backed out:
* runtest.exp: Handle multiple directories in TCL variables
dir_to_run and cmdline_dir_to_run.
Index: runtest.exp
===================================================================
RCS file: /cvs/src/src/dejagnu/runtest.exp,v
retrieving revision 1.4
diff -c -r1.4 runtest.exp
*** runtest.exp 2000/08/05 06:34:02 1.4
--- runtest.exp 2000/08/07 17:53:42
***************
*** 1730,1736 ****
# value (for example in MULTIPASS) and the test
# directory matches that directory.
if {[info exists dir_to_run] && $dir_to_run != ""} {
! if ![string match "*${dir_to_run}*" $dir] {
continue
}
}
--- 1730,1745 ----
# value (for example in MULTIPASS) and the test
# directory matches that directory.
if {[info exists dir_to_run] && $dir_to_run != ""} {
! # JYG: dir_to_run might be a space delimited list
! # of directories. Look for match on each item.
! set found 0
! foreach directory $dir_to_run {
! if [string match "*${directory}*" $dir] {
! set found 1
! break
! }
! }
! if {!$found} {
continue
}
}
***************
*** 1740,1746 ****
# directory matches that directory
if {[info exists cmdline_dir_to_run] \
&& $cmdline_dir_to_run != ""} {
! if ![string match "*${cmdline_dir_to_run}*" $dir] {
continue
}
}
--- 1749,1764 ----
# directory matches that directory
if {[info exists cmdline_dir_to_run] \
&& $cmdline_dir_to_run != ""} {
! # JYG: cmdline_dir_to_run might be a space delimited
! # list of directories. Look for match on each item.
! set found 0
! foreach directory $cmdline_dir_to_run {
! if [string match "*${directory}*" $dir] {
! set found 1
! break
! }
! }
! if {!$found} {
continue
}
}