aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gdb/testsuite/ChangeLog17
-rw-r--r--gdb/testsuite/gdb.base/corefile.exp15
2 files changed, 30 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 3d48e2f..1ddb695 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,20 @@
+Sun Oct 9 07:44:06 1994 Jim Kingdon (kingdon@lioth.cygnus.com)
+
+ * gdb.base/corefile.exp: Add (xfail'd) test for reinit_frame_cache
+ bug involving using inferior_pid to figure out whether to select a
+ frame.
+
+Wed Sep 28 23:12:02 1994 Jeff Law (law@snake.cs.utah.edu)
+
+ * gdb.disasm/hppa.exp: Change arg[0..3] to r[26..23] to
+ match the current disassembler output.
+
+Fri Sep 16 11:42:41 1994 Stan Shebs (shebs@andros.cygnus.com)
+
+ * gdb.fortran/exprs.exp: Expect VOID instead of void.
+ * gdb.fortran/types.exp: Escape the expected '*'s in Fortran
+ types, expect "int" as type of integer values (for now).
+
Wed Sep 7 23:33:51 1994 Jeff Law (law@snake.cs.utah.edu)
* gdb.base/commands.exp: New tests for if/while commands.
diff --git a/gdb/testsuite/gdb.base/corefile.exp b/gdb/testsuite/gdb.base/corefile.exp
index 2dc2d5a..5406b4d 100644
--- a/gdb/testsuite/gdb.base/corefile.exp
+++ b/gdb/testsuite/gdb.base/corefile.exp
@@ -52,9 +52,9 @@ if ![file exists $objdir/$subdir/corefile] then {
catch "system \"cd $objdir/$subdir; ./$binfile\""
if [file exists $objdir/$subdir/core] then {
catch "exec mv $objdir/$subdir/core $objdir/$subdir/corefile"
- } else if [file exists $objdir/$subdir/core.$binfile] {
+ } elseif [file exists $objdir/$subdir/core.$binfile] {
catch "exec mv $objdir/$subdir/core.$binfile $objdir/$subdir/corefile"
- } else if [file exists $objdir/$subdir/$binfile.core] {
+ } elseif [file exists $objdir/$subdir/$binfile.core] {
catch "exec mv $objdir/$subdir/$binfile.core $objdir/$subdir/corefile"
}
}
@@ -136,4 +136,15 @@ $prompt $" { pass "core-file command" }
timeout { fail "(timeout) core-file command" }
}
+# test reinit_frame_cache
+
+gdb_load $objdir/$subdir/$binfile
+setup_xfail "*-*-*"
+gdb_test "up" "#\[0-9\]* *\[0-9xa-fH'\]* in .* \\(\\)"
+
+# another good test of roughly the same thing would be to select a frame,
+# print a local variable in that frame, then do the "file" and
+# (without selecting the frame again explicitly) print the variable
+# again.
+
gdb_test "core" "No core file now."