darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2025-01-09 21:50:35 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

* gdb.base/annota1.exp, gdb.base/maint.exp: Use string_to_regexp.

Browse Source
This commit is contained in:
Daniel Jacobowitz 2006-10-12 19:03:22 +00:00
parent 78af1e2086
commit 8c008720eb
3 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,7 @@
2006-10-12 Daniel Jacobowitz <dan@codesourcery.com>
* gdb.base/annota1.exp, gdb.base/maint.exp: Use string_to_regexp.
2006-10-09 Jan Kratochvil <jan.kratochvil@redhat.com> 2006-10-09 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.threads/tls-nodebug.c, gdb.threads/tls-nodebug.exp: New test. * gdb.threads/tls-nodebug.c, gdb.threads/tls-nodebug.exp: New test.

3
gdb/testsuite/gdb.base/annota1.exp
View File

@ -147,9 +147,10 @@ gdb_expect {
# annotate-stopped # annotate-stopped
# #
#exp_internal 1 #exp_internal 1
set binexp [string_to_regexp $binfile]
send_gdb "run\n" send_gdb "run\n"
gdb_expect { gdb_expect {
-re "\r\n\032\032post-prompt\r\nStarting program: $binfile \(\r\n\r\n\032\032frames-invalid\)+\(\(\r\n\r\n\032\032frames-invalid\)|\(\r\n\r\n\032\032breakpoints-invalid\)\)*\r\n\r\n\032\032starting\(\r\n\r\n\032\032frames-invalid\)+\(\(\r\n\r\n\032\032frames-invalid\)|\(\r\n\r\n\032\032breakpoints-invalid\)\)*\r\n\r\n\032\032breakpoint 1\r\n\r\nBreakpoint 1, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nmain\r\n\032\032frame-args\r\n \\(\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n.*annota1.c\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n$main_line\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*$srcfile:$main_line:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped.*$gdb_prompt$" { -re "\r\n\032\032post-prompt\r\nStarting program: $binexp \(\r\n\r\n\032\032frames-invalid\)+\(\(\r\n\r\n\032\032frames-invalid\)|\(\r\n\r\n\032\032breakpoints-invalid\)\)*\r\n\r\n\032\032starting\(\r\n\r\n\032\032frames-invalid\)+\(\(\r\n\r\n\032\032frames-invalid\)|\(\r\n\r\n\032\032breakpoints-invalid\)\)*\r\n\r\n\032\032breakpoint 1\r\n\r\nBreakpoint 1, \r\n\032\032frame-begin 0 $hex\r\n\r\n\032\032frame-function-name\r\nmain\r\n\032\032frame-args\r\n \\(\\)\r\n\032\032frame-source-begin\r\n at \r\n\032\032frame-source-file\r\n.*annota1.c\r\n\032\032frame-source-file-end\r\n:\r\n\032\032frame-source-line\r\n$main_line\r\n\032\032frame-source-end\r\n\r\n\r\n\032\032source.*$srcfile:$main_line:.*:beg:$hex\r\n\r\n\032\032frame-end\r\n\r\n\032\032stopped.*$gdb_prompt$" {
pass "run until main breakpoint" pass "run until main breakpoint"
} }
-re ".*$gdb_prompt$" { -re ".*$gdb_prompt$" {

4
gdb/testsuite/gdb.base/maint.exp
View File

@ -328,7 +328,7 @@ gdb_expect {
# Check that maint print msymbols allows relative pathnames # Check that maint print msymbols allows relative pathnames
set mydir [pwd] set mydir [pwd]
gdb_test "cd ${objdir}" "Working directory ${objdir}\..*" gdb_test "cd ${objdir}" "Working directory [string_to_regexp ${objdir}]\..*"
gdb_test_multiple "maint print msymbols msymbols_output2 ${subdir}/${testfile}" "maint print msymbols" { gdb_test_multiple "maint print msymbols msymbols_output2 ${subdir}/${testfile}" "maint print msymbols" {
-re "^maint print msymbols msymbols_output2 \[^\n\]*\r\n$gdb_prompt $" { -re "^maint print msymbols msymbols_output2 \[^\n\]*\r\n$gdb_prompt $" {
gdb_test_multiple "shell ls msymbols_output2" "maint print msymbols" { gdb_test_multiple "shell ls msymbols_output2" "maint print msymbols" {
@ -361,7 +361,7 @@ gdb_test_multiple "maint print msymbols msymbols_output2 ${subdir}/${testfile}"
fail "(timeout) maint print msymbols" fail "(timeout) maint print msymbols"
} }
} }
gdb_test "cd ${mydir}" "Working directory ${mydir}\..*" gdb_test "cd ${mydir}" "Working directory [string_to_regexp ${mydir}]\..*"
send_gdb "maint print symbols\n" send_gdb "maint print symbols\n"
gdb_expect { gdb_expect {