* 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.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 2e8a09c5052f7be7659cfe9188fb5641601e0c9f..d85aec9f55ed1bc7c8c5deefd14f54cb1e1dd421 100644 (file)
--- 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 9026b7119d5b1e7da4ee91d6f2960e2fe1d9da95..552a07056e14d94a3525a29e51d48afc1c20d3a2 100644 (file)
--- 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 024b5e8eadb82b94ff961d8a75be1372a7ce6371..f493a710da9d03dc35c1bd916592c5e25fc94e1f 100644 (file)
--- 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 5372390c05c6178026e5539065b8f20d914b0415..68524a9f257ec037ff574254aaea66377b4e5e47 100644 (file)
--- 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 fae0f7136b0e528275ded9664bd724617e4e2841..3cdbacffc8ed7a4ff5b86954f2e15c98bae39152 100644 (file)
--- 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 {