* gdb.base/maint.exp: Treat $EXEEXT as optional in output.

This commit is contained in:
Corinna Vinschen 2001-10-13 08:36:32 +00:00
parent d60dc82aca
commit 03dd63aa03
2 changed files with 6 additions and 2 deletions

View File

@ -1,3 +1,7 @@
2001-10-09 Corinna Vinschen <vinschen@redhat.com>
* gdb.base/maint.exp: Treat $EXEEXT as optional in output.
2001-10-04 Frank Ch. Eigler <fche@redhat.com>
* lib/insight-support.exp (gdbtk_start): Don't exit dejagnu

View File

@ -200,7 +200,7 @@ set keep_looking 1
while {$keep_looking} {
gdb_expect {
-re ".*Object file.*break$EXEEXT: Objfile at $hex, bfd at $hex, \[0-9\]* minsyms\[\r\t \]+\n" { set header 1 }
-re ".*Object file.*break($EXEEXT)?: Objfile at $hex, bfd at $hex, \[0-9\]* minsyms\[\r\t \]+\n" { set header 1 }
-re ".*Psymtabs:\[\r\t \]+\n" { set psymtabs 1 }
-re ".*Symtabs:\[\r\t \]+\n" { set symtabs 1 }
@ -379,7 +379,7 @@ set timeout [expr $timeout + 300]
#
send_gdb "maint info sections\n"
gdb_expect {
-re "Exec file:\r\n.*break$EXEEXT., file type.*$gdb_prompt $"\
-re "Exec file:\r\n.*break($EXEEXT)?., file type.*$gdb_prompt $"\
{ pass "maint info sections" }
-re ".*$gdb_prompt $" { fail "maint info sections" }
timeout { fail "(timeout) maint info sections" }