espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-26 22:07:58 +08:00
Code Issues Packages Projects Releases Wiki Activity

2001-05-10 Elena Zannoni <ezannoni@redhat.com>

Browse Source 
* gdb.base/completion.exp: Revamp test. Make it execute on all
       platforms.
This commit is contained in:
Elena Zannoni
2001-05-11 19:53:38 +00:00
parent 40713331c5
commit a602d56b17
1 changed files with 13 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
gdb/testsuite/gdb.base/completion.exp
View File

@ -52,11 +52,6 @@ if $tracelevel then {
} }
if { ![istarget "hppa*-hp-hpux*"] } {
#skip all these tests for now (FIXME)
continue
}
global usestubs global usestubs
# #
@ -379,7 +374,7 @@ gdb_expect {
-re "^p 'a\\\x07$" { -re "^p 'a\\\x07$" {
send_gdb "\t" send_gdb "\t"
gdb_expect { gdb_expect {
-re "a64l.*atol.*$gdb_prompt p .a$" { -re "a64l.*argv.*$gdb_prompt p .a$" {
send_gdb "\n" send_gdb "\n"
gdb_expect { gdb_expect {
-re "Invalid character constant\\..*$gdb_prompt $" { -re "Invalid character constant\\..*$gdb_prompt $" {
@ -439,7 +434,7 @@ gdb_expect {
-re "^p b-a\\\x07$" { -re "^p b-a\\\x07$" {
send_gdb "\t" send_gdb "\t"
gdb_expect { gdb_expect {
-re "a64l.*atol.*$gdb_prompt p b-a$" { -re "a64l.*argv.*$gdb_prompt p b-a$" {
send_gdb "\n" send_gdb "\n"
gdb_expect { gdb_expect {
-re "No symbol \"b\" in current context\\..*$gdb_prompt $" { -re "No symbol \"b\" in current context\\..*$gdb_prompt $" {
@ -533,10 +528,10 @@ gdb_expect {
} }
send_gdb "file ${srcdir}/gdb.base/self\t" send_gdb "file ${srcdir}/gdb.base/compl\t"
sleep 1 sleep 1
gdb_expect { gdb_expect {
-re "^file ${srcdir}/gdb.base/.*'selftest\\.exp' $"\ -re "^file ${srcdir}/gdb.base/completion\\.exp $"\
{ send_gdb "\n" { send_gdb "\n"
gdb_expect { gdb_expect {
-re "\r\nA program is being debugged already\\. Kill it\\? \\(y or n\\) $" -re "\r\nA program is being debugged already\\. Kill it\\? \\(y or n\\) $"
@ -544,20 +539,19 @@ gdb_expect {
{ send_gdb "n\n" { send_gdb "n\n"
gdb_expect { gdb_expect {
-re "\r\nProgram not killed\\.\r\n$gdb_prompt $"\ -re "\r\nProgram not killed\\.\r\n$gdb_prompt $"\
{ pass "complete 'file gdb.base/self'"} { pass "complete 'file gdb.base/compl'"}
-re ".*$gdb_prompt $" { fail "complete 'file gdb.base/self'"} -re ".*$gdb_prompt $" { fail "complete 'file gdb.base/compl'"}
timeout {fail "(timeout) complete 'file gdb.base/self'"} timeout {fail "(timeout) complete 'file gdb.base/compl'"}
} }
} }
-re ".*$gdb_prompt $" { fail "complete 'file gdb.base/self'"} -re ".*$gdb_prompt $" { fail "complete 'file gdb.base/compl'"}
timeout {fail "(timeout) complete 'file gdb.base/self'"} timeout {fail "(timeout) complete 'file gdb.base/compl'"}
} }
} }
-re ".*$gdb_prompt $" { fail "complete 'file gdb.base/self'" } -re ".*$gdb_prompt $" { fail "complete 'file gdb.base/compl'" }
timeout { fail "(timeout) complete 'file gdb.base/self'" } timeout { fail "(timeout) complete 'file gdb.base/compl'" }
} }
send_gdb "info func mark\t" send_gdb "info func mark\t"
sleep 1 sleep 1
gdb_expect { gdb_expect {
@ -569,7 +563,7 @@ gdb_expect {
-re "marker1.*$gdb_prompt info func marker$"\ -re "marker1.*$gdb_prompt info func marker$"\
{ send_gdb "\n" { send_gdb "\n"
gdb_expect { gdb_expect {
-re "All functions matching regular expression \"marker\":\r\n\r\nFile.*break.c:\r\nint marker1\\(.*\\);\r\nint marker2\\(int\\).*marker3\\(char.*char.*\\).*marker4\\(long\\);\r\n$gdb_prompt $"\ -re "All functions matching regular expression \"marker\":\r\n\r\nFile.*break.c:\r\nint marker1\\(\\);\r\nint marker2\\(int\\).*marker3\\(char.*char.*\\).*marker4\\(long int\\);\r\n$gdb_prompt $"\
{ pass "complete 'info func mar'"} { pass "complete 'info func mar'"}
-re ".*$gdb_prompt $" { fail "complete 'info func mar'"} -re ".*$gdb_prompt $" { fail "complete 'info func mar'"}
timeout {fail "(timeout) complete 'info func mar'"} timeout {fail "(timeout) complete 'info func mar'"}
@ -590,7 +584,7 @@ gdb_expect {
-re "ask.*child.*parent.*$gdb_prompt set follow-fork-mode $"\ -re "ask.*child.*parent.*$gdb_prompt set follow-fork-mode $"\
{ send_gdb "\n" { send_gdb "\n"
gdb_expect { gdb_expect {
-re "Requires an argument.*parent.*child.*ask.*$gdb_prompt $"\ -re "Requires an argument.*ask.*child.*parent.*$gdb_prompt $"\
{ pass "complete 'set follow-fork-mode'"} { pass "complete 'set follow-fork-mode'"}
-re "Ambiguous item \"\"\\..*$gdb_prompt $"\ -re "Ambiguous item \"\"\\..*$gdb_prompt $"\
{ pass "complete 'set follow-fork-mode'"} { pass "complete 'set follow-fork-mode'"}