aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.base/setvar.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/setvar.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/setvar.exp')
-rw-r--r--gdb/testsuite/gdb.base/setvar.exp29
1 files changed, 21 insertions, 8 deletions
diff --git a/gdb/testsuite/gdb.base/setvar.exp b/gdb/testsuite/gdb.base/setvar.exp
index 367378d..3a8400e 100644
--- a/gdb/testsuite/gdb.base/setvar.exp
+++ b/gdb/testsuite/gdb.base/setvar.exp
@@ -30,19 +30,26 @@ if $tracelevel then {
set prms_id 0
set bug_id 0
-set binfile "setvar"
+set testfile "setvar"
+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
}
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
-gdb_load $objdir/$subdir/$binfile
+gdb_load $binfile
-source gdb.base/setvar.ci
+source ${binfile}.ci
#
# set it up at a breakpoint so we canplay with the variable values
@@ -1844,8 +1851,14 @@ if {$gcc_compiled} then {
gdb_test "print sef.field" "print.*.\[0-9\]* = sm1" "print sef.field (sm1)"
gdb_test "print sef.field=s1" "print.*.\[0-9\]* = s1"
gdb_test "print sef.field" "print.*.\[0-9\]* = s1" "print sef.field (s1)"
- gdb_test "print uef.field=u1" "print.*.\[0-9\]* = u1"
- gdb_test "print uef.field" "print.*.\[0-9\]* = u1" "print uef.field (u1)"
gdb_test "print uef.field=u2" "print.*.\[0-9\]* = u2"
gdb_test "print uef.field" "print.*.\[0-9\]* = u2" "print uef.field (u2)"
+ gdb_test "print uef.field=u1" "print.*.\[0-9\]* = u1"
+ gdb_test "print uef.field" "print.*.\[0-9\]* = u1" "print uef.field (u1)"
+
+ # Test for truncation when assigning invalid values to bitfields.
+ gdb_test "print sef.field=7" \
+ "print.*warning: Value does not fit in 2 bits.*\[0-9\]* = sm1"
+ gdb_test "print uef.field=6" \
+ "print.*warning: Value does not fit in 2 bits.*\[0-9\]* = u2"
}