From: Michael Snyder Date: Wed, 27 Nov 1996 19:13:21 +0000 (+0000) Subject: Tue Nov 26 18:29:23 1996 Michael Snyder X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=50f04a5a37ce4bd1da4def5bee108c361cdfddac;p=binutils-gdb.git Tue Nov 26 18:29:23 1996 Michael Snyder * gdb.base/callfuncs.exp: Turn on function call tests for h8300. * gdb.base/default.exp: ditto. * gdb.base/nodebug.exp: ditto. * gdb.base/printcmds.exp: ditto. * gdb.base/ptype.exp: ditto. * gdb.base/setvar.exp: ditto. * gdb.base/structs.exp: ditto. * gdb.base/setshow.c: Guard against uninitialized values of argc. --- diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index fbd7c69bd3c..43307c31559 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,14 @@ +Tue Nov 26 18:29:23 1996 Michael Snyder + + * gdb.base/callfuncs.exp: Turn on function call tests for h8300. + * gdb.base/default.exp: ditto. + * gdb.base/nodebug.exp: ditto. + * gdb.base/printcmds.exp: ditto. + * gdb.base/ptype.exp: ditto. + * gdb.base/setvar.exp: ditto. + * gdb.base/structs.exp: ditto. + * gdb.base/setshow.c: Guard against uninitialized values of argc. + Tue Nov 26 17:23:28 1996 Ian Lance Taylor * configure, */configure: Rebuild with autoconf 2.12. diff --git a/gdb/testsuite/gdb.base/nodebug.exp b/gdb/testsuite/gdb.base/nodebug.exp index 1d95c88e244..39a840ad75c 100644 --- a/gdb/testsuite/gdb.base/nodebug.exp +++ b/gdb/testsuite/gdb.base/nodebug.exp @@ -12,7 +12,10 @@ set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} # Get rid of any -g options (including -gstabs, -gdwarf, etc... -regsub -all -- {[ ]-g[^ ]*} $target_info(target,cflags) { } target_info(target,cflags) +if [info exists target_info(target,cflags)] { + set saved_cflags $target_info(target,cflags) + regsub -all -- {[ ]-g[^ ]*} $target_info(target,cflags) { } target_info(target,cflags) +} if { [compile "${srcdir}/${subdir}/${srcfile} -o ${binfile}"] != "" } { perror "Couldn't compile ${srcfile}" @@ -26,6 +29,11 @@ if { [compile "-E ${srcdir}/${subdir}/compiler.c > ${binfile}.ci"] != "" } { perror "Couldn't make ${binfile}.ci file" return -1 } + +if [info exists target_info(target,cflags)] { + set target_info(target,cflags) $saved_cflags +} + source ${binfile}.ci gdb_reinitialize_dir $srcdir/$subdir @@ -107,25 +115,23 @@ if [runto inner] then { if {!$gcc_compiled} then { setup_xfail "hppa*-*-hpux*" } gdb_test "ptype bsslocal" "<(data variable|variable), no debug info>" - gdb_test "backtrace" "#0.*inner.*#1.*middle.*#2.*top.*#3.*main.*" \ + gdb_test "backtrace 10" "#0.*inner.*#1.*middle.*#2.*top.*#3.*main.*" \ "backtrace from inner in nodebug.exp" # Or if that doesn't work, at least hope for the external symbols # Commented out because if we aren't going to xfail the above test # ever, why bother with a weaker test? - #gdb_test "backtrace" "#0.*inner.*#1.*#2.*top.*#3.*main.*" \ + #gdb_test "backtrace 10" "#0.*inner.*#1.*#2.*top.*#3.*main.*" \ # "backtrace from inner in nodebug.exp for externals" # This test is not as obscure as it might look. `p getenv ("TERM")' # is a real-world example, at least on many systems. - setup_xfail "h8300*-*-*" if {!$gcc_compiled} then { setup_xfail "hppa*-*-hpux*" } gdb_test {p/c array_index("abcdef",2)} " = 99 'c'" # Now, try that we can give names of file-local symbols which happen # to be unique, and have it still work if [runto middle] then { - setup_xfail "h8300*-*-*" - gdb_test "backtrace" "#0.*middle.*#1.*top.*#2.*main.*" \ + gdb_test "backtrace 10" "#0.*middle.*#1.*top.*#2.*main.*" \ "backtrace from middle in nodebug.exp" } }