espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-25 04:49:54 +08:00
Code Issues Packages Projects Releases Wiki Activity

gdb/testsuite/

Browse Source 
Fix gdb.mi/mi-solib.exp without system debug info installed.
	* lib/mi-support.exp (mi_expect_stop): Accept FILE also for `from'
	expect attribute, return 0 for it.  Update comments.
This commit is contained in:
Jan Kratochvil
2011-12-02 22:35:17 +00:00
parent 2268b414f4
commit 05acf27496
2 changed files with 21 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,9 @@
2011-12-02 Jan Kratochvil <jan.kratochvil@redhat.com>
Fix gdb.mi/mi-solib.exp without system debug info installed.
* lib/mi-support.exp (mi_expect_stop): Accept FILE also for `from'
expect attribute, return 0 for it. Update comments.
2011-12-02 Jan Kratochvil <jan.kratochvil@redhat.com> 2011-12-02 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.base/solib-corrupted.exp: Suppress test on is_remote target. * gdb.base/solib-corrupted.exp: Suppress test on is_remote target.

24
gdb/testsuite/lib/mi-support.exp
View File

@ -981,9 +981,10 @@ proc mi_detect_async {} {
# Wait for MI *stopped notification to appear. # Wait for MI *stopped notification to appear.
# The REASON, FUNC, ARGS, FILE and LINE are regular expressions # The REASON, FUNC, ARGS, FILE and LINE are regular expressions
# to match against whatever is output in *stopped. ARGS should # to match against whatever is output in *stopped. FILE may also match
# not include [] the list of argument is enclosed in, and other # filename of a file without debug info. ARGS should not include [] the
# regular expressions should not include quotes. # list of argument is enclosed in, and other regular expressions should
# not include quotes.
# If EXTRA is a list of one element, it's the regular expression # If EXTRA is a list of one element, it's the regular expression
# for output expected right after *stopped, and before GDB prompt. # for output expected right after *stopped, and before GDB prompt.
# If EXTRA is a list of two elements, the first element is for # If EXTRA is a list of two elements, the first element is for
@ -991,9 +992,10 @@ proc mi_detect_async {} {
# right after reason field. The regex after reason should not include # right after reason field. The regex after reason should not include
# the comma separating it from the following fields. # the comma separating it from the following fields.
# #
# When we fail to match output at all, -1 is returned. Otherwise, # When we fail to match output at all, -1 is returned. If FILE does
# the line at which we stop is returned. This is useful when exact # match and the target system has no debug info for FILE return 0.
# line is not possible to specify for some reason -- one can pass # Otherwise, the line at which we stop is returned. This is useful when
# exact line is not possible to specify for some reason -- one can pass
# the .* or "\[0-9\]*" regexps for line, and then check the line # the .* or "\[0-9\]*" regexps for line, and then check the line
# programmatically. # programmatically.
# #
@ -1067,11 +1069,15 @@ proc mi_expect_stop { reason func args file line extra test } {
set any "\[^\n\]*" set any "\[^\n\]*"
verbose -log "mi_expect_stop: expecting: \\*stopped,${r}${a}${bn}frame=\{addr=\"$hex\",func=\"$func\",args=$args,file=\"$any$file\",fullname=\"${fullname_syntax}$file\",line=\"$line\"\}$after_stopped,thread-id=\"$decimal\",stopped-threads=$any\r\n($thread_selected_re|$breakpoint_re)*$prompt_re" verbose -log "mi_expect_stop: expecting: \\*stopped,${r}${a}${bn}frame=\{addr=\"$hex\",func=\"$func\",args=$args,(?:file=\"$any$file\",fullname=\"${fullname_syntax}$file\",line=\"$line\"|from=\"$file\")\}$after_stopped,thread-id=\"$decimal\",stopped-threads=$any\r\n($thread_selected_re|$breakpoint_re)*$prompt_re"
gdb_expect { gdb_expect {
-re "\\*stopped,${r}${a}${bn}frame=\{addr=\"$hex\",func=\"$func\",args=$args,file=\"$any$file\",fullname=\"${fullname_syntax}$file\",line=\"($line)\"\}$after_stopped,thread-id=\"$decimal\",stopped-threads=$any\r\n($thread_selected_re|$breakpoint_re)*$prompt_re" { -re "\\*stopped,${r}${a}${bn}frame=\{addr=\"$hex\",func=\"$func\",args=$args,(?:file=\"$any$file\",fullname=\"${fullname_syntax}$file\",line=\"($line)\"|from=\"$file\")\}$after_stopped,thread-id=\"$decimal\",stopped-threads=$any\r\n($thread_selected_re|$breakpoint_re)*$prompt_re" {
pass "$test" pass "$test"
return $expect_out(2,string) if {[array names expect_out "2,string"] != ""} {
return $expect_out(2,string)
}
# No debug info available but $file does match.
return 0
} }
-re "\\*stopped,${r}${a}${bn}frame=\{addr=\"$hex\",func=\"$any\",args=\[\\\[\{\]$any\[\\\]\}\],file=\"$any\",fullname=\"${fullname_syntax}$any\",line=\"\[0-9\]*\"\}$after_stopped,thread-id=\"$decimal\",stopped-threads=$any\r\n($thread_selected_re|$breakpoint_re)*$prompt_re" { -re "\\*stopped,${r}${a}${bn}frame=\{addr=\"$hex\",func=\"$any\",args=\[\\\[\{\]$any\[\\\]\}\],file=\"$any\",fullname=\"${fullname_syntax}$any\",line=\"\[0-9\]*\"\}$after_stopped,thread-id=\"$decimal\",stopped-threads=$any\r\n($thread_selected_re|$breakpoint_re)*$prompt_re" {
verbose -log "got $expect_out(buffer)" verbose -log "got $expect_out(buffer)"