diff options
Diffstat (limited to 'gdb/testsuite/gdb.base/shlib-call.exp')
| -rw-r--r-- | gdb/testsuite/gdb.base/shlib-call.exp | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/gdb/testsuite/gdb.base/shlib-call.exp b/gdb/testsuite/gdb.base/shlib-call.exp index 6a5f6d8..4a5cefd 100644 --- a/gdb/testsuite/gdb.base/shlib-call.exp +++ b/gdb/testsuite/gdb.base/shlib-call.exp @@ -59,7 +59,8 @@ if { [gdb_compile_shlib ${lib1src} ${lib1} $lib_opts] != "" # Start with a fresh gdb. -clean_restart ${binfile} +clean_restart +gdb_load $binfile gdb_load_shlib $lib1 gdb_load_shlib $lib2 @@ -78,7 +79,7 @@ gdb_test "next 2" "g = shr1\\(g\\);" "next to shr1" gdb_test "print g" "\[0-9\]* = 1" #step -over -if ![gdb_skip_stdio_test "next over shr1"] { +if {![gdb_skip_stdio_test "next over shr1"]} { gdb_test_stdio "next" \ "address of sgs is $hex" \ "g = shr2\\(g\\);" \ @@ -92,7 +93,7 @@ if ![gdb_skip_stdio_test "next over shr1"] { gdb_test "print g" "\[0-9\]* = 2" "print g two" #print shr1(1) -if ![gdb_skip_stdio_test "print shr1(1)"] { +if {![gdb_skip_stdio_test "print shr1(1)"]} { gdb_test_stdio "print shr1(1)" \ "address of sgs is $hex" \ "\[0-9\]* = 2" \ @@ -100,7 +101,7 @@ if ![gdb_skip_stdio_test "print shr1(1)"] { } #print shr1(g) -if ![gdb_skip_stdio_test "print shr1(g)"] { +if {![gdb_skip_stdio_test "print shr1(g)"]} { gdb_test_stdio "print shr1(g)" \ "address of sgs is $hex" \ "\[0-9\]* = 4" \ @@ -119,7 +120,7 @@ gdb_test "continue" \ #print shr1(1) -if ![gdb_skip_stdio_test "print shr1(1) 2nd time"] { +if {![gdb_skip_stdio_test "print shr1(1) 2nd time"]} { gdb_test_stdio "print shr1(1)" \ "address of sgs is $hex" \ "\[0-9\]* = 2" \ @@ -161,7 +162,8 @@ gdb_test "step" "mainshr1 \\(g=4\\) at.*return 2.g;" \ # Start with a fresh gdb. -clean_restart $binfile +clean_restart +gdb_load $binfile # PR's 16495, 18213 # test that we can re-set breakpoints in shared libraries |