* gdb.base/corefile.exp: Remove "alpha-dec-osf2*" native compiled
authorFred Fish <fnf@specifix.com>
Sat, 16 Mar 1996 00:47:44 +0000 (00:47 +0000)
committerFred Fish <fnf@specifix.com>
Sat, 16 Mar 1996 00:47:44 +0000 (00:47 +0000)
setup_xfail for "print coremaker_bss", "print coremaker_ro",
  "print func2::coremaker_local", and "backtrace in corefile.exp".

gdb/testsuite/ChangeLog
gdb/testsuite/gdb.base/corefile.exp

index a3430b8..90ff170 100644 (file)
@@ -1,3 +1,9 @@
+Fri Mar 15 16:17:22 1996  Fred Fish  <fnf@cygnus.com>
+
+       * gdb.base/corefile.exp: Remove "alpha-dec-osf2*" native compiled 
+       setup_xfail for "print coremaker_bss", "print coremaker_ro",
+       "print func2::coremaker_local", and "backtrace in corefile.exp".
+
 Wed Mar 13 14:54:11 1996  Fred Fish  <fnf@cygnus.com>
 
        * gdb.base/signals.exp: Remove "alpha-*-osf2*" setup_xfail for
index 4218edf..48993a9 100644 (file)
@@ -61,7 +61,7 @@ if ![file exists ${objdir}/${subdir}/corefile] then {
     #    execute_anywhere "${binfile}"
     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" ${exec_output} ] {
+       if [ regexp "No such file or directory|not found" ${exec_output} ] {
            continue
        } else {
            execute_anywhere "mv $i ${objdir}/${subdir}/corefile"
@@ -69,8 +69,24 @@ if ![file exists ${objdir}/${subdir}/corefile] then {
        }
     }
     if { $found == 0 } {
-       warning "can't generate a core file - core tests suppressed - check ulimit -c"
-       return 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 fine a core file above.
+       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"
+               set found 1
+           }
+       }
+
+       if { $found == 0  } {
+           warning "can't generate a core file - core tests suppressed - check ulimit -c"
+           return 0
+       }
     }
 }
 
@@ -172,7 +188,6 @@ gdb_test "print func2::coremaker_local" "\\\$$decimal = {0, 1, 2, 3, 4}"
 
 # Haven't investigated this xfail
 setup_xfail "m68k-*-hpux*" "i*86-*-sysv4*"
-# Strange that this one depends upon being native compiled.
 gdb_test "bt" "abort.*func2.*func1.*main.*" "backtrace in corefile.exp"
 
 # test reinit_frame_cache