diff options
| author | Bob Manson <manson@cygnus> | 1997-01-29 09:40:31 +0000 |
|---|---|---|
| committer | Bob Manson <manson@cygnus> | 1997-01-29 09:40:31 +0000 |
| commit | 787f6220773d9174a9675dedd3bbfc8f070511a6 (patch) | |
| tree | 64911c10d46bc93973cc825a730b4173b3367a49 /gdb/testsuite/gdb.chill/pr-5022.exp | |
| parent | 1a2faf1f1e335ff32c1d8c5c7675cd7ce9055e33 (diff) | |
| download | gdb-787f6220773d9174a9675dedd3bbfc8f070511a6.zip gdb-787f6220773d9174a9675dedd3bbfc8f070511a6.tar.gz gdb-787f6220773d9174a9675dedd3bbfc8f070511a6.tar.bz2 | |
Major revision to testsuites for cross-testing and DOS testing support.
Diffstat (limited to 'gdb/testsuite/gdb.chill/pr-5022.exp')
| -rw-r--r-- | gdb/testsuite/gdb.chill/pr-5022.exp | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gdb/testsuite/gdb.chill/pr-5022.exp b/gdb/testsuite/gdb.chill/pr-5022.exp index e690343..e08c40b 100644 --- a/gdb/testsuite/gdb.chill/pr-5022.exp +++ b/gdb/testsuite/gdb.chill/pr-5022.exp @@ -46,15 +46,15 @@ proc do_tests {} { gdb_reinitialize_dir $srcdir/$subdir gdb_load $binfile - send "set language chill\n" ; expect -re "$prompt $" + gdb_test "set language chill "" # This is needed (at least on SunOS4) to make sure the # the symbol table is read. - send "break gdbme.ch:3\n" ; expect -re "$prompt $" - send "delete 1\n" ; expect -re "$prompt $" + gdb_test "break gdbme.ch:3 "" + gdb_test "delete 1 "" - send "set width 0\n" ; expect -re "$prompt $" - send "set print sevenbit-strings\n" ; expect -re "$prompt $" + gdb_test "set width 0 "" + gdb_test "set print sevenbit-strings "" test_pr_5022 } @@ -63,7 +63,7 @@ proc test_pr_5022 {} { global prompt runto dummy_pr_5022 gdb_test "p p" " = NULL" "print NULL pointer" - send "continue\n" ; expect -re "$prompt $" + gdb_test "continue "" gdb_test "p p" {= PTR\(H'[0-9a-fA-F]+\)} "print non-NULL pointer" } |