aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.base/whatis.exp
diff options
context:
space:
mode:
authorFred Fish <fnf@specifix.com>1995-11-25 19:55:29 +0000
committerFred Fish <fnf@specifix.com>1995-11-25 19:55:29 +0000
commit782445c7aa2722092434b23adfb27e27acfd9e06 (patch)
tree055b2886c76b645574a00b03c3aee2fe95373e00 /gdb/testsuite/gdb.base/whatis.exp
parent9b041f69fc5372c05d5d8a067d8263c12c2a3abb (diff)
downloadgdb-782445c7aa2722092434b23adfb27e27acfd9e06.zip
gdb-782445c7aa2722092434b23adfb27e27acfd9e06.tar.gz
gdb-782445c7aa2722092434b23adfb27e27acfd9e06.tar.bz2
From Rob Savoye (rob@poseidon.cygnus.com)
* Makefile.in, configure.in, gdb.base/{Makefile.in, configure.in}, gdb.c++/{Makefile.in, configure.in}, gdb.chill/{Makefile.in, configure.in}, gdb.disasm/{Makefile.in, configure.in}, gdb.stabs/{Makefile.in, configure.in}, gdb.threads/{Makefile.in, configure.in}: Major reworking for autoconfig. * aclocal.m4, configure, gdb.base/configure, gdb.c++/configure, gdb.disasm/configure, gdb.stabs/configure, gdb.stabs/default.mt : New files. * config/unix-gdb.exp: Make GDB global. * gdb.base/{a1-selftest.exp, a2-run.exp,bitfields.exp, break.exp, callfuncs.exp, commands.exp, corefile.exp, crossload.exp, exprs.exp, funcargs.exp, interrupt.exp, langs.exp, list.exp, mips_pro.exp, nodebug.exp, opaque.exp, printcmds.exp, ptype.exp, recurse.exp, regs.exp, return.exp, scope.exp, setvar.exp, sigall.exp, signals.exp, term.exp, twice.exp, watchpoint.exp, whatis.exp}, gdb.c++/{classes.exp, callfuncs.exp, inherit.exp, misc.exp, templates.exp, virtfunc.exp}, gdb.chill/{callch.exp, chillvars.exp, misc.exp, pr-4975.exp, pr-5016.exp, pr-5020.exp, pr-5022.exp, pr-5646.exp, pr-5984.exp, pr-6292.exp, pr-6632.exp, pr-8134.exp, pr-8136.exp, result.exp, string.exp, tuples.exp}, gdb.disasm/{hppa.exp, sh3.exp}, gdb.stabs/weird.exp: Change continues to returns as necessary, arrange for test to compile own testcase executable. * lib/gdb.exp: Changes for testsuite to compile own test cases. From Fred Fish (fnf@cygnus.com) * gdb.c++/classes.exp (test_pointers_to_class_members): Add clear_xfail at end of test which might not call either pass or fail. * gdb.base/a1-selftest.exp: Add i*86-*-linuxaout xfail for "backtrace through signal handler".
Diffstat (limited to 'gdb/testsuite/gdb.base/whatis.exp')
-rw-r--r--gdb/testsuite/gdb.base/whatis.exp24
1 files changed, 16 insertions, 8 deletions
diff --git a/gdb/testsuite/gdb.base/whatis.exp b/gdb/testsuite/gdb.base/whatis.exp
index 42a5c3f..011ff30 100644
--- a/gdb/testsuite/gdb.base/whatis.exp
+++ b/gdb/testsuite/gdb.base/whatis.exp
@@ -19,7 +19,7 @@
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel then {
+if $tracelevel {
strace $tracelevel
}
@@ -29,11 +29,18 @@ if $tracelevel then {
set prms_id 0
set bug_id 0
-set binfile "whatis"
+set testfile whatis
+set srcfile ${srcdir}/$subdir/${testfile}.c
+set binfile ${objdir}/${subdir}/${testfile}
+if { [compile "${srcfile} -g -o ${binfile}"] != "" } {
+ perror "Couldn't compile ${srcfile}"
+ return -1
+}
-if ![file exists $objdir/$subdir/$binfile] then {
- perror "$objdir/$subdir/$binfile does not exist."
- return 0
+execute_anywhere "rm -f ${binfile}.ci"
+if { [compile "-E ${srcdir}/${subdir}/compiler.c > ${binfile}.ci"] != "" } {
+ perror "Couldn't make ${testfile}.ci file"
+ return -1
}
# Start with a fresh gdb.
@@ -41,9 +48,9 @@ if ![file exists $objdir/$subdir/$binfile] then {
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
-gdb_load $objdir/$subdir/$binfile
+gdb_load $binfile
-source gdb.base/whatis.ci
+source ${binfile}.ci
# If we did not use the signed keyword when compiling the file, don't
# expect GDB to know that char is signed.
@@ -61,7 +68,7 @@ if $signed_keyword_not_used then {
proc setup_xfail_on_long_vs_int {} {
global gcc_compiled
- if {!$gcc_compiled} then {
+ if {!$gcc_compiled} {
setup_xfail "*-sun-sunos4*" "*-*-ultrix*" "i*86-sequent-bsd*"
}
}
@@ -78,6 +85,7 @@ gdb_test "whatis v_char" \
"whatis char"
setup_xfail "a29k-*-*"
+if {!$gcc_compiled} then { setup_xfail "mips-sgi-irix*" }
gdb_test "whatis v_signed_char" \
"type = $signed_char" \
"whatis signed char"