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/misc.exp | |
parent | e385d6e03e0733be01c51d24588b981c9e928d6c (diff) | |
download | binutils-gdb-85fbaa747f9edd4184cce516c8804bb4553e08f7.tar.gz |
* 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/misc.exp')
-rw-r--r-- | gdb/testsuite/gdb.chill/misc.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.chill/misc.exp b/gdb/testsuite/gdb.chill/misc.exp index bf5b6d3625c..f064adc8f16 100644 --- a/gdb/testsuite/gdb.chill/misc.exp +++ b/gdb/testsuite/gdb.chill/misc.exp @@ -39,7 +39,7 @@ if { [compile "${srcfile} -g -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'" @@ -47,7 +47,7 @@ proc set_lang_chill {} { send_gdb "set language chill\n" expect { - -re ".*$prompt $" {} + -re ".*$gdb_prompt $" {} timeout { fail "set language chill (timeout)" ; return 0 } } @@ -94,7 +94,7 @@ if ![set_lang_chill] then { gdb_test "print array () ubyte (foo)" { = \[\(0:11\): 0\]} send_gdb "set var \$i := foo\n" - expect -re ".*$prompt $" + expect -re ".*$gdb_prompt $" setup_xfail "m68*-*-hpux*" gdb_test "print/x array () byte (\$i)" { = \[\(0:11\): H'0\]} } |