diff options
| author | Jeff Law <law@redhat.com> | 1997-02-06 20:58:55 +0000 |
|---|---|---|
| committer | Jeff Law <law@redhat.com> | 1997-02-06 20:58:55 +0000 |
| commit | dada510572401dcbf13efdc21e7c9ceef136534a (patch) | |
| tree | 6616e99067dec7f8ad37c73a651d8e2278b16777 /gdb | |
| parent | 0979e7bd2887523bd21d91383b0e5b238ed1f5b7 (diff) | |
| download | gdb-dada510572401dcbf13efdc21e7c9ceef136534a.zip gdb-dada510572401dcbf13efdc21e7c9ceef136534a.tar.gz gdb-dada510572401dcbf13efdc21e7c9ceef136534a.tar.bz2 | |
* gdb.base/nodebug.exp: Don't try to do an inferior function
call if the target doesn't support them.
* gdb.base/printcmds.exp: Likewise.
* gdb.base/setvar.exp: Likewise.
* gdb.base/structs.exp: Likewise.
* gdb.c++/templates.exp: Likewise.
* gdb.base/ptype.exp: Likewise. Remove UDI specific stuff.
* gdb.base/recurse.exp: Enable for the mn10200.
* configure.in: Do configure gdb.stabs directory for *-*-elf
targets.
* configure: Rebuilt.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 14 | ||||
| -rw-r--r-- | gdb/testsuite/configure.in | 1 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/printcmds.exp | 12 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/recurse.exp | 2 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/structs.exp | 6 |
5 files changed, 34 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 2e8a09c..d85aec9 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,19 @@ Thu Feb 6 12:46:14 1997 Jeffrey A Law (law@cygnus.com) + * gdb.base/nodebug.exp: Don't try to do an inferior function + call if the target doesn't support them. + * gdb.base/printcmds.exp: Likewise. + * gdb.base/setvar.exp: Likewise. + * gdb.base/structs.exp: Likewise. + * gdb.c++/templates.exp: Likewise. + * gdb.base/ptype.exp: Likewise. Remove UDI specific stuff. + + * gdb.base/recurse.exp: Enable for the mn10200. + + * configure.in: Do configure gdb.stabs directory for *-*-elf + targets. + * configure: Rebuilt. + * gdb.base/break.exp: Check for gdb,noresults before testing exit status and/or results from the target. * gdb.base/watchpoint.exp, gdb.base/langs.exp: Likewise. diff --git a/gdb/testsuite/configure.in b/gdb/testsuite/configure.in index 9026b71..552a070 100644 --- a/gdb/testsuite/configure.in +++ b/gdb/testsuite/configure.in @@ -29,6 +29,7 @@ case "${target}" in *-*-lynxos*) configdirs="${configdirs} ${stabsdirs}" ;; *-sun-*) configdirs="${configdirs} ${stabsdirs}" ;; hppa*-*-*) configdirs="${configdirs} ${stabsdirs}" ;; + *-*-elf*) configdirs="${configdirs} ${stabsdirs}" ;; *) if test "x${with_stabs}" = x"yes" ; then configdirs="${configdirs} ${stabsdirs}" fi ;; diff --git a/gdb/testsuite/gdb.base/printcmds.exp b/gdb/testsuite/gdb.base/printcmds.exp index 024b5e8..f493a71 100644 --- a/gdb/testsuite/gdb.base/printcmds.exp +++ b/gdb/testsuite/gdb.base/printcmds.exp @@ -929,6 +929,12 @@ proc test_print_string_constants {} { gdb_test "set print elements 50" "" + if [target_info exists gdb,cannot_call_functions] { + setup_xfail "*-*-*" 2416 + fail "This target can not call functions" + return + } + setup_xfail "a29k-*-udi" 2416 gdb_test "p \"a string\"" " = \"a string\"" setup_xfail "a29k-*-udi" 2416 @@ -953,6 +959,12 @@ proc test_print_string_constants {} { proc test_print_array_constants {} { + if [target_info exists gdb,cannot_call_functions] { + setup_xfail "*-*-*" 2416 + fail "This target can not call functions" + return + } + setup_xfail "a29k-*-udi" 2416 gdb_test "print {'a','b','c'}" " = \"abc\"" setup_xfail "a29k-*-udi" 2416 diff --git a/gdb/testsuite/gdb.base/recurse.exp b/gdb/testsuite/gdb.base/recurse.exp index 5372390..68524a9 100644 --- a/gdb/testsuite/gdb.base/recurse.exp +++ b/gdb/testsuite/gdb.base/recurse.exp @@ -125,7 +125,7 @@ proc recurse_tests {} { # Only enabled for some targets merely because it has not been tested # elsewhere. -if {[istarget "sparc*-*-sunos4*"] || [istarget "hppa*-*-bsd*"] || [istarget "sparclet-*-*"] || [istarget "m32r-*-elf"]} then { +if {[istarget "sparc*-*-sunos4*"] || [istarget "hppa*-*-bsd*"] || [istarget "sparclet-*-*"] || [istarget "m32r-*-elf"] || [istarget "mn10200-*-*"]} then { # Preserve the old timeout, and set a new one that should be # sufficient to avoid timing out during this test. diff --git a/gdb/testsuite/gdb.base/structs.exp b/gdb/testsuite/gdb.base/structs.exp index fae0f71..3cdbacf 100644 --- a/gdb/testsuite/gdb.base/structs.exp +++ b/gdb/testsuite/gdb.base/structs.exp @@ -133,6 +133,12 @@ send_gdb "set print sevenbit-strings\n" ; expect -re "$gdb_prompt $" send_gdb "set print address off\n" ; expect -re "$gdb_prompt $" send_gdb "set width 0\n" ; expect -re "$gdb_prompt $" +if [target_info exists gdb,cannot_call_functions] { + setup_xfail "*-*-*" 2416 + fail "This target can not call functions" + return 0 +} + if [runto_main] then { do_function_calls } else { |