diff options
author | Doug Evans <dje@google.com> | 2008-11-14 06:55:40 +0000 |
---|---|---|
committer | Doug Evans <dje@google.com> | 2008-11-14 06:55:40 +0000 |
commit | 2580417f09953db3ceb3fd3f50b7d49994bcefeb (patch) | |
tree | 9cf785c513b2fb4976837eb230eb30c114e37383 /gdb/testsuite/gdb.base/callexit.exp | |
parent | 43b5d01b26f1cc37cc31d79df3cb93db4bdc63dd (diff) | |
download | gdb-2580417f09953db3ceb3fd3f50b7d49994bcefeb.zip gdb-2580417f09953db3ceb3fd3f50b7d49994bcefeb.tar.gz gdb-2580417f09953db3ceb3fd3f50b7d49994bcefeb.tar.bz2 |
(set_lang_c): Delete.
(runto_main): If it fails, call fail instead of gdb_suppress_tests.
Diffstat (limited to 'gdb/testsuite/gdb.base/callexit.exp')
-rw-r--r-- | gdb/testsuite/gdb.base/callexit.exp | 38 |
1 files changed, 3 insertions, 35 deletions
diff --git a/gdb/testsuite/gdb.base/callexit.exp b/gdb/testsuite/gdb.base/callexit.exp index 6d4149b..a794b83 100644 --- a/gdb/testsuite/gdb.base/callexit.exp +++ b/gdb/testsuite/gdb.base/callexit.exp @@ -37,35 +37,6 @@ if [target_info exists gdb,cannot_call_functions] { continue } -# Set the current language to C. This counts as a test. If it -# fails, then we skip the other tests. - -proc set_lang_c {} { - global gdb_prompt - - send_gdb "set language c\n" - gdb_expect { - -re ".*$gdb_prompt $" {} - timeout { fail "set language c (timeout)" ; return 0; } - } - - send_gdb "show language\n" - gdb_expect { - -re ".* source language is \"c\".*$gdb_prompt $" { - pass "set language to \"c\"" - return 1 - } - -re ".*$gdb_prompt $" { - fail "setting language to \"c\"" - return 0 - } - timeout { - fail "can't show language (timeout)" - return 0 - } - } -} - # Start with a fresh gdb. gdb_exit @@ -73,12 +44,9 @@ gdb_start gdb_reinitialize_dir $srcdir/$subdir gdb_load ${binfile} -if { ![set_lang_c] } { - gdb_suppress_tests; -} else { - if { ![runto_main] } { - gdb_suppress_tests; - } +if { ![runto_main] } { + fail "Can't run to main" + return 0 } # Call function (causing the program to exit), and see if gdb handles |