diff options
Diffstat (limited to 'gdb/testsuite/gdb.chill/tuples.exp')
| -rw-r--r-- | gdb/testsuite/gdb.chill/tuples.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.chill/tuples.exp b/gdb/testsuite/gdb.chill/tuples.exp index 5204c76..639a10e 100644 --- a/gdb/testsuite/gdb.chill/tuples.exp +++ b/gdb/testsuite/gdb.chill/tuples.exp @@ -46,7 +46,7 @@ proc do_tests {} { gdb_reinitialize_dir $srcdir/$subdir gdb_load $binfile - send "set language chill\n" ; expect -re "$prompt $" + gdb_test "set language chill "" runto tuples.ch:40 @@ -109,8 +109,8 @@ proc do_tests {} { gdb_test_exact "print vstr.ch1" {= 'x'} "vstr.ch1 after assignment" # These tests are from Cygnus PR chill/5024: - send "break printdow\n" ; expect -re "$prompt $" - send "continue\n" ; expect -re "$prompt $" + gdb_test "break printdow "" + gdb_test "continue "" gdb_test_exact "set var w:= dow\[monday\]" {} gdb_test "print w" " = \\\[monday\\\]" \ "print bitstring after assignment" |