diff options
| author | Bob Manson <manson@cygnus> | 1997-02-02 07:59:25 +0000 |
|---|---|---|
| committer | Bob Manson <manson@cygnus> | 1997-02-02 07:59:25 +0000 |
| commit | 85fbaa747f9edd4184cce516c8804bb4553e08f7 (patch) | |
| tree | 3011762b44f70c7e2abfd700004d1d0652c831a9 /gdb/testsuite/gdb.chill/powerset.exp | |
| parent | e385d6e03e0733be01c51d24588b981c9e928d6c (diff) | |
| download | gdb-85fbaa747f9edd4184cce516c8804bb4553e08f7.zip gdb-85fbaa747f9edd4184cce516c8804bb4553e08f7.tar.gz gdb-85fbaa747f9edd4184cce516c8804bb4553e08f7.tar.bz2 | |
* gdb.*/*.exp: Replace $prompt with $gdb_prompt.
* gdb.base/scope.exp: Use gdb_test.
* gdb.c++/classes.exp: Ditto.
* gdb.c++/inherit.exp: Ditto.
More random cleanups. Still lots to go, however.
Diffstat (limited to 'gdb/testsuite/gdb.chill/powerset.exp')
| -rw-r--r-- | gdb/testsuite/gdb.chill/powerset.exp | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gdb/testsuite/gdb.chill/powerset.exp b/gdb/testsuite/gdb.chill/powerset.exp index 9a912d6..525e03c 100644 --- a/gdb/testsuite/gdb.chill/powerset.exp +++ b/gdb/testsuite/gdb.chill/powerset.exp @@ -37,26 +37,26 @@ if { [compile "${srcfile} -g -w -o ${binfile} ${CHILL_RT0} ${CHILL_LIB}"] != "" # fails, then we skip the other tests. proc set_lang_chill {} { - global prompt + global gdb_prompt global binfile objdir subdir verbose "loading file '$binfile'" gdb_load $binfile send_gdb "set language chill\n" expect { - -re ".*$prompt $" {} + -re ".*$gdb_prompt $" {} timeout { fail "set language chill (timeout)" ; return 0 } } send_gdb "show language\n" expect { - -re ".* source language is \"chill\".*$prompt $" { + -re ".* source language is \"chill\".*$gdb_prompt $" { pass "set language to \"chill\"" send_gdb "break xx_\n" expect { - -re ".*$prompt $" { + -re ".*$gdb_prompt $" { send_gdb "run\n" - expect -re ".*$prompt $" {} + expect -re ".*$gdb_prompt $" {} return 1 } timeout { @@ -65,7 +65,7 @@ proc set_lang_chill {} { } } } - -re ".*$prompt $" { + -re ".*$gdb_prompt $" { fail "setting language to \"chill\"" return 0 } @@ -90,7 +90,7 @@ proc set_lang_chill {} { # Third one is an optional message to be printed proc test_print_accept { args } { - global prompt + global gdb_prompt global passcount global verbose |