diff options
author | Jim Kingdon <jkingdon@engr.sgi.com> | 1995-03-08 21:32:37 +0000 |
---|---|---|
committer | Jim Kingdon <jkingdon@engr.sgi.com> | 1995-03-08 21:32:37 +0000 |
commit | 5e8ade236109349137ac4aaf9f2b0cc83290a4ca (patch) | |
tree | f6d3f48f1508b8de692b26e8c2c7ddc5caf470d8 | |
parent | a331c834c11652ae73c4d7913375d6f06c817834 (diff) | |
download | gdb-5e8ade236109349137ac4aaf9f2b0cc83290a4ca.zip gdb-5e8ade236109349137ac4aaf9f2b0cc83290a4ca.tar.gz gdb-5e8ade236109349137ac4aaf9f2b0cc83290a4ca.tar.bz2 |
* *.exp: Skip all tests silently if skip_chill_tests returns true.
* misc.exp: Remove reference to non-existent variable passcount.
-rw-r--r-- | gdb/testsuite/gdb.chill/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/callch.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/chexp.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/chillvars.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/misc.exp | 3 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-4975.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-5016.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-5020.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-5022.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-5646.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-5984.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-6292.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/result.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/string.exp | 2 | ||||
-rw-r--r-- | gdb/testsuite/gdb.chill/tuples.exp | 2 |
15 files changed, 34 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.chill/ChangeLog b/gdb/testsuite/gdb.chill/ChangeLog index 32cbaa3..def9ee4 100644 --- a/gdb/testsuite/gdb.chill/ChangeLog +++ b/gdb/testsuite/gdb.chill/ChangeLog @@ -1,3 +1,9 @@ +Wed Mar 8 13:26:36 1995 Jim Kingdon (kingdon@lioth.cygnus.com) + + * *.exp: Skip all tests silently if skip_chill_tests returns true. + + * misc.exp: Remove reference to non-existent variable passcount. + Tue Mar 7 19:30:05 1995 Per Bothner <bothner@kalessin.cygnus.com> * string.ch, string.exp, Makefile.in: New test case. diff --git a/gdb/testsuite/gdb.chill/callch.exp b/gdb/testsuite/gdb.chill/callch.exp index 610af19..3f4541b 100644 --- a/gdb/testsuite/gdb.chill/callch.exp +++ b/gdb/testsuite/gdb.chill/callch.exp @@ -61,6 +61,8 @@ proc do_tests {} { set binfile "callch.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/chexp.exp b/gdb/testsuite/gdb.chill/chexp.exp index 6da127c..0b4a77d 100644 --- a/gdb/testsuite/gdb.chill/chexp.exp +++ b/gdb/testsuite/gdb.chill/chexp.exp @@ -428,6 +428,8 @@ proc test_arithmetic_expressions {} { # Start with a fresh gdb. +if [skip_chill_tests] then { continue } + gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir diff --git a/gdb/testsuite/gdb.chill/chillvars.exp b/gdb/testsuite/gdb.chill/chillvars.exp index 05a9810..78d9f01 100644 --- a/gdb/testsuite/gdb.chill/chillvars.exp +++ b/gdb/testsuite/gdb.chill/chillvars.exp @@ -291,6 +291,8 @@ proc test_structs {} { set binfile "chillvars.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/misc.exp b/gdb/testsuite/gdb.chill/misc.exp index a12bdb8..3a13868 100644 --- a/gdb/testsuite/gdb.chill/misc.exp +++ b/gdb/testsuite/gdb.chill/misc.exp @@ -55,7 +55,8 @@ proc set_lang_chill {} { # Start with a fresh gdb. set binfile "misc.exe" -global passcount + +if [skip_chill_tests] then { continue } gdb_exit gdb_start diff --git a/gdb/testsuite/gdb.chill/pr-4975.exp b/gdb/testsuite/gdb.chill/pr-4975.exp index cd11f34..00756ea 100644 --- a/gdb/testsuite/gdb.chill/pr-4975.exp +++ b/gdb/testsuite/gdb.chill/pr-4975.exp @@ -51,6 +51,8 @@ proc do_tests {} { set binfile "pr-4975.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$objdir/$subdir/$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/pr-5016.exp b/gdb/testsuite/gdb.chill/pr-5016.exp index 0e4f83d..612a16f 100644 --- a/gdb/testsuite/gdb.chill/pr-5016.exp +++ b/gdb/testsuite/gdb.chill/pr-5016.exp @@ -52,6 +52,8 @@ proc do_tests {} { set binfile "pr-5016.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/pr-5020.exp b/gdb/testsuite/gdb.chill/pr-5020.exp index 902bb05..79a00fb 100644 --- a/gdb/testsuite/gdb.chill/pr-5020.exp +++ b/gdb/testsuite/gdb.chill/pr-5020.exp @@ -79,6 +79,8 @@ proc test_pr_5020 {} { set binfile "pr-5020.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$objdir/$subdir/$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/pr-5022.exp b/gdb/testsuite/gdb.chill/pr-5022.exp index 9b77713..ce518c4 100644 --- a/gdb/testsuite/gdb.chill/pr-5022.exp +++ b/gdb/testsuite/gdb.chill/pr-5022.exp @@ -64,6 +64,8 @@ proc test_pr_5022 {} { set binfile "pr-5022.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/pr-5646.exp b/gdb/testsuite/gdb.chill/pr-5646.exp index e819110..f4ee9cc 100644 --- a/gdb/testsuite/gdb.chill/pr-5646.exp +++ b/gdb/testsuite/gdb.chill/pr-5646.exp @@ -50,6 +50,8 @@ proc do_tests {} { set binfile "pr-5646.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/pr-5984.exp b/gdb/testsuite/gdb.chill/pr-5984.exp index 9ba7c57..e4aba5a 100644 --- a/gdb/testsuite/gdb.chill/pr-5984.exp +++ b/gdb/testsuite/gdb.chill/pr-5984.exp @@ -51,6 +51,8 @@ proc do_tests {} { set binfile "pr-5984.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/pr-6292.exp b/gdb/testsuite/gdb.chill/pr-6292.exp index a01e08b..2af77ce 100644 --- a/gdb/testsuite/gdb.chill/pr-6292.exp +++ b/gdb/testsuite/gdb.chill/pr-6292.exp @@ -52,6 +52,8 @@ proc do_tests {} { set binfile "pr-6292.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/result.exp b/gdb/testsuite/gdb.chill/result.exp index ba3f024..c84e062 100644 --- a/gdb/testsuite/gdb.chill/result.exp +++ b/gdb/testsuite/gdb.chill/result.exp @@ -62,6 +62,8 @@ proc do_tests {} { set binfile "result.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$objdir/$subdir/$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/string.exp b/gdb/testsuite/gdb.chill/string.exp index daf6ff9..2c5ed5a 100644 --- a/gdb/testsuite/gdb.chill/string.exp +++ b/gdb/testsuite/gdb.chill/string.exp @@ -55,6 +55,8 @@ proc do_tests {} { set binfile "string.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { diff --git a/gdb/testsuite/gdb.chill/tuples.exp b/gdb/testsuite/gdb.chill/tuples.exp index 4f7803a..2251a04 100644 --- a/gdb/testsuite/gdb.chill/tuples.exp +++ b/gdb/testsuite/gdb.chill/tuples.exp @@ -117,6 +117,8 @@ proc do_tests {} { set binfile "tuples.exe" set srcfile $binfile.ch +if [skip_chill_tests] then { continue } + if ![file exists $objdir/$subdir/$binfile] then { warning "$binfile does not exist; tests suppressed." } else { |