diff options
| author | Daniel Jacobowitz <drow@false.org> | 2003-01-04 23:05:05 +0000 |
|---|---|---|
| committer | Daniel Jacobowitz <drow@false.org> | 2003-01-04 23:05:05 +0000 |
| commit | b5ab8ff3a405de207d647b0fd0a3346939c8042e (patch) | |
| tree | ca60b64461ba4decd20316b12ecc94be8528b9d0 /gdb/testsuite/lib/gdb.exp | |
| parent | ff2d781336965fc130fa7deaa00efb635d95af43 (diff) | |
| download | gdb-b5ab8ff3a405de207d647b0fd0a3346939c8042e.zip gdb-b5ab8ff3a405de207d647b0fd0a3346939c8042e.tar.gz gdb-b5ab8ff3a405de207d647b0fd0a3346939c8042e.tar.bz2 | |
Fix PR gdb/844
* lib/gdb.exp (gdb_compile): Handle "quiet" option.
(gdb_compile_pthreads): Pass "quiet" to gdb_compile.
* gdb.threads/gcore-thread.exp: Use gdb_compile_pthreads. Return
instead of calling gdb_suppress_entire_file.
* gdb.threads/print-threads.exp: Likewise.
* gdb.threads/schedlock.exp: Likewise.
* gdb.threads/killed.exp: Return instead of calling
gdb_suppress_entire_file.
* gdb.threads/linux-dp.exp: Likewise.
* gdb.threads/pthreads.exp: Likewise.
Diffstat (limited to 'gdb/testsuite/lib/gdb.exp')
| -rw-r--r-- | gdb/testsuite/lib/gdb.exp | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index a339221..b4261ae 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -1,4 +1,5 @@ -# Copyright 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000 +# Copyright 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, +# 2002, 2003 # Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify @@ -1134,7 +1135,7 @@ proc gdb_compile {source dest type options} { set result [target_compile $source $dest $type $options]; regsub "\[\r\n\]*$" "$result" "" result; regsub "^\[\r\n\]*" "$result" "" result; - if { $result != "" } { + if { $result != "" && [lsearch $options quiet] == -1} { clone_output "gdb compile failed, $result" } return $result; @@ -1150,7 +1151,7 @@ proc gdb_compile_pthreads {source dest type options} { foreach lib {-lpthreads -lpthread -lthread} { # This kind of wipes out whatever libs the caller may have # set. Or maybe theirs will override ours. How infelicitous. - set options_with_lib [concat $options [list libs=$lib]] + set options_with_lib [concat $options [list libs=$lib quiet]] set ccout [gdb_compile $source $dest $type $options_with_lib] switch -regexp -- $ccout { ".*no posix threads support.*" { |