diff options
Diffstat (limited to 'gdb/testsuite/gdb.chill/pr-6292.exp')
| -rw-r--r-- | gdb/testsuite/gdb.chill/pr-6292.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.chill/pr-6292.exp b/gdb/testsuite/gdb.chill/pr-6292.exp index 45c66d3..9fa6f74 100644 --- a/gdb/testsuite/gdb.chill/pr-6292.exp +++ b/gdb/testsuite/gdb.chill/pr-6292.exp @@ -46,10 +46,10 @@ proc do_tests {} { gdb_reinitialize_dir $srcdir/$subdir gdb_load $binfile - send "set language chill\n" ; + send_gdb "set language chill\n" ; - send "break pr-6292.ch:15\n"; expect -re "$prompt $" - send "run\n"; expect -re "Breakpoint .*pr-6292.ch:15.*$prompt $" + gdb_test "break pr-6292.ch:15 "" + send_gdb "run\n"; expect -re "Breakpoint .*pr-6292.ch:15.*$prompt $" gdb_test_exact "call klaus()" {here's klaus calling.} gdb_test {set fred(10, i)} {a was '10'; b was '12'.} gdb_test "print i" { = 13} "print i after call" |