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.

Index: generic/gdbtk-cmds.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-cmds.c,v
retrieving revision 1.59
diff -u -r1.59 gdbtk-cmds.c
--- generic/gdbtk-cmds.c	12 Nov 2002 20:24:04 -0000	1.59
+++ generic/gdbtk-cmds.c	19 Nov 2002 19:32:57 -0000
@@ -2272,7 +2272,7 @@
 	  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
Index: generic/gdbtk-stack.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-stack.c,v
retrieving revision 1.10
diff -u -r1.10 gdbtk-stack.c
--- generic/gdbtk-stack.c	12 Nov 2002 20:24:04 -0000	1.10
+++ generic/gdbtk-stack.c	19 Nov 2002 19:32:57 -0000
@@ -526,7 +526,7 @@
       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 @@
   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);