From: cagney <cagney>
Date: Tue, 19 Nov 2002 19:33:45 +0000 (+0000)
Subject: 2002-11-19  Andrew Cagney  <ac131313@redhat.com>
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=b8bcd9aa481c240033bbab8a99eebfdb889b08f2;p=pf3gnuchains%2Fpf3gnuchains3x.git

2002-11-19  Andrew Cagney  <ac131313@redhat.com>

	* generic/gdbtk-cmds.c (gdb_loc): Use get_frame_type instead of
	->signal_handler_caller.
	* generic/gdbtk-stack.c (get_frame_name): Ditto.
	(get_frame_name): Ditto.
---

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index fcb552165d..5f7490d0d2 100644
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,10 @@
+2002-11-19  Andrew Cagney  <ac131313@redhat.com>
+
+	* generic/gdbtk-cmds.c (gdb_loc): Use get_frame_type instead of
+	->signal_handler_caller.
+	* generic/gdbtk-stack.c (get_frame_name): Ditto.
+	(get_frame_name): Ditto.
+
 2002-11-12  Andrew Cagney  <ac131313@redhat.com>
 
 	From 2002-11-11 David Carlton <carlton@math.stanford.edu>
diff --git a/gdb/gdbtk/generic/gdbtk-cmds.c b/gdb/gdbtk/generic/gdbtk-cmds.c
index 3fc06e299b..a53c013f40 100644
--- a/gdb/gdbtk/generic/gdbtk-cmds.c
+++ b/gdb/gdbtk/generic/gdbtk-cmds.c
@@ -2272,7 +2272,7 @@ gdb_loc (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST obj
 	  pc = selected_frame->pc;
 	  sal = find_pc_line (selected_frame->pc,
 			      selected_frame->next != NULL
-			      && !selected_frame->next->signal_handler_caller
+			      && !(get_frame_type (selected_frame->next) == SIGTRAMP_FRAME)
 			      && !deprecated_frame_in_dummy (selected_frame->next));
 	}
       else
diff --git a/gdb/gdbtk/generic/gdbtk-stack.c b/gdb/gdbtk/generic/gdbtk-stack.c
index a2a9d8f71e..14f3148a01 100644
--- a/gdb/gdbtk/generic/gdbtk-stack.c
+++ b/gdb/gdbtk/generic/gdbtk-stack.c
@@ -526,7 +526,7 @@ get_frame_name (Tcl_Interp *interp, Tcl_Obj *list, struct frame_info *fi)
       Tcl_ListObjAppendElement (interp, list, objv[0]);
       return;
     }
-  if (fi->signal_handler_caller)
+  if ((get_frame_type (fi) == SIGTRAMP_FRAME))
     {
       objv[0] = Tcl_NewStringObj ("<signal handler called>\n", -1);
       Tcl_ListObjAppendElement (interp, list, objv[0]);
@@ -536,7 +536,7 @@ get_frame_name (Tcl_Interp *interp, Tcl_Obj *list, struct frame_info *fi)
   sal =
     find_pc_line (fi->pc,
 		  fi->next != NULL
-		  && !fi->next->signal_handler_caller
+		  && !(get_frame_type (fi) == SIGTRAMP_FRAME)
 		  && !deprecated_frame_in_dummy (fi->next));
 
   func = find_pc_function (fi->pc);