From 05a21390230b3711b2504e4902f1acce25772584 Mon Sep 17 00:00:00 2001 From: Bob Manson Date: Fri, 31 Jan 1997 21:21:31 +0000 Subject: [PATCH] * gdb.base/crossload.exp: Don't use execute_anywhere, use remote_exec instead. * gdb.base/corefile.exp: Don't be ridiculous. * gdb.base/*.c: Add missing stub invocations. Fixes failures on HP-UX. --- gdb/testsuite/ChangeLog | 7 +++++++ gdb/testsuite/config/.Sanitize | 20 ++++++++++++-------- gdb/testsuite/gdb.base/compiler.c | 4 ++-- gdb/testsuite/gdb.base/corefile.exp | 11 +++++------ gdb/testsuite/gdb.base/crossload.exp | 2 +- gdb/testsuite/lib/gdb.exp | 3 +-- 6 files changed, 28 insertions(+), 19 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 5b9e68582f2..a62e85f2177 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +Fri Jan 31 13:09:12 1997 Bob Manson + + * gdb.base/crossload.exp: Don't use execute_anywhere, use + remote_exec instead. + * gdb.base/corefile.exp: Don't be ridiculous. + * gdb.base/*.c: Add missing stub invocations. + Thu Jan 30 16:49:25 1997 Bob Manson * config/slite.exp: Miscellaneous fixes. diff --git a/gdb/testsuite/config/.Sanitize b/gdb/testsuite/config/.Sanitize index 21b87a0b213..4c407cdfec6 100644 --- a/gdb/testsuite/config/.Sanitize +++ b/gdb/testsuite/config/.Sanitize @@ -17,7 +17,7 @@ Do-first: -m32r_files="m32r.exp" +m32r_files="m32r.exp m32r-stub.exp" if ( echo $* | grep keep\-m32r > /dev/null ) ; then keep_these_too="${m32r_files} ${keep_these_too}" @@ -39,7 +39,8 @@ est.exp gdbserver.exp hmsirom.exp hppro.exp -mips-gdb.exp +mips.exp +mips-idt.exp monitor.exp mt-a29k-udi mt-i386-aout @@ -53,18 +54,21 @@ mt-sparc-aout mt-unix mt-vxworks netware.exp -nind-gdb.exp +nind.exp rom68k.exp -sim-gdb.exp -slite-gdb.exp -udi-gdb.exp -unix-gdb.exp +sim.exp +slite.exp +udi.exp +unix.exp unknown.exp -vx-gdb.exp +vx.exp vxworks29k.exp Things-to-lose: +d10v.exp +sparclet-old.exp +sparclet.exp # The lines between the "Do-last:" line and the end of the file # are executed as a /bin/sh shell script after everything else is diff --git a/gdb/testsuite/gdb.base/compiler.c b/gdb/testsuite/gdb.base/compiler.c index 6ce5805898f..8eb0d47dd19 100644 --- a/gdb/testsuite/gdb.base/compiler.c +++ b/gdb/testsuite/gdb.base/compiler.c @@ -13,8 +13,8 @@ definition made with 'set" to see if one already exists, and if so warn about conflicts if it is being set to something else. */ -/* This needs to be kept in sync with whatis.c. If this proves to end up - being hairy, we could use a common header file. */ +/* This needs to be kept in sync with whatis.c and gdb.exp(get_compiler_info). + If this ends up being hairy, we could use a common header file. */ #if defined (__STDC__) || defined (_AIX) set signed_keyword_not_used 0 diff --git a/gdb/testsuite/gdb.base/corefile.exp b/gdb/testsuite/gdb.base/corefile.exp index d2f78948d64..b4a3b2c2c29 100644 --- a/gdb/testsuite/gdb.base/corefile.exp +++ b/gdb/testsuite/gdb.base/corefile.exp @@ -57,7 +57,7 @@ if [get_compiler_info ${binfile}] { # the name of the program to "core". set found 0 catch "system \"(cd ${objdir}/${subdir}; ulimit -c unlimited; ${binfile}; true) >/dev/null 2>&1\"" -# remote_exec "${binfile}" +# remote_exec host "${binfile}" foreach i "${objdir}/${subdir}/core ${objdir}/${subdir}/core.coremaker.c ${binfile}.core" { if [remote_file build exists $i] { remote_exec build "mv $i ${objdir}/${subdir}/corefile" @@ -68,13 +68,12 @@ if { $found == 0 } { # The braindamaged HPUX shell quits after the ulimit -c above # without executing ${binfile}. So we try again without the # ulimit here if we didn't find a core file above. + # Oh, I should mention that any "braindamaged" non-Unix system has + # the same problem. I like the cd bit too, it's really neat'n stuff. catch "system \"(cd ${objdir}/${subdir}; ${binfile}; true) >/dev/null 2>&1\"" foreach i "${objdir}/${subdir}/core ${objdir}/${subdir}/core.coremaker.c ${binfile}.core" { - set exec_output [execute_anywhere "ls $i"] - if [ regexp "No such file or directory|not found" ${exec_output} ] { - continue - } else { - execute_anywhere "mv $i ${objdir}/${subdir}/corefile" + if [remote_file build exists $i] { + remote_exec build "mv $i ${objdir}/${subdir}/corefile" set found 1 } } diff --git a/gdb/testsuite/gdb.base/crossload.exp b/gdb/testsuite/gdb.base/crossload.exp index eed58b4d240..0683cf9cbfb 100644 --- a/gdb/testsuite/gdb.base/crossload.exp +++ b/gdb/testsuite/gdb.base/crossload.exp @@ -35,7 +35,7 @@ verbose "FIXME: all the crossload tests ignored" return foreach i "m68k-elf m68k-aout m68k-aout2 mips-ecoff i486-elf sparc-aout i860-elf sparc-elf" { - execute_anywhere "cd ${objdir}/${subdir} ; uudecode ${srcdir}/${subdir}/$i.u " + remote_exec build "cd ${objdir}/${subdir} ; uudecode ${srcdir}/${subdir}/$i.u " } # FIXME: These tests don't work for the i960, because diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 31b72ff838e..828ef129940 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -654,8 +654,7 @@ proc gdb_file_cmd { arg } { return 0 } timeout { - perror "(timeout) Couldn't load $arg, other program already l -oaded." + perror "(timeout) Couldn't load $arg, other program already loaded." return -1 } } -- 2.30.2