Thu May 21 13:14:25 1998 John Metzler <jmetzler@cygnus.com>

[deliverable/binutils-gdb.git] / gdb / blockframe.c

diff --git a/gdb/blockframe.c b/gdb/blockframe.c
index d10bdd3055aa9a144d3b6b08f05acf0323879207..3a84ae7b78b69629747590e1555e444992727f2b 100644 (file)
--- a/gdb/blockframe.c
+++ b/gdb/blockframe.c
@@ -997,7 +997,9 @@ generic_frame_chain_valid (fp, fi)
   if (PC_IN_CALL_DUMMY(FRAME_SAVED_PC(fi), fp, fp))
     return 1;   /* don't prune CALL_DUMMY frames */
   else          /* fall back to default algorithm (see frame.h) */
-    return (fp != 0 && !inside_entry_file (FRAME_SAVED_PC(fi)));
+    return (fp != 0
+           && fi->frame INNER_THAN fp
+           && !inside_entry_file (FRAME_SAVED_PC(fi)));
 }
  
 /* Function: get_saved_register