2002-11-27 Andrew Cagney <cagney@redhat.com>

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

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index 12bf68b..df30d18 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,9 @@
+2002-11-27  Andrew Cagney  <cagney@redhat.com>
+
+       * generic/gdbtk-stack.c (get_frame_name): Use get_frame_type
+       instead of deprecated_frame_in_dummy.
+       * generic/gdbtk-cmds.c (gdb_loc): Ditto.
+
 2002-11-19  Andrew Cagney  <ac131313@redhat.com>
 
        * generic/gdbtk-stack.c (gdb_selected_frame): Use get_frame_base

diff --git a/gdb/gdbtk/generic/gdbtk-cmds.c b/gdb/gdbtk/generic/gdbtk-cmds.c
index a53c013..b1f63a9 100644 (file)
--- a/gdb/gdbtk/generic/gdbtk-cmds.c
+++ b/gdb/gdbtk/generic/gdbtk-cmds.c
@@ -2273,7 +2273,7 @@ gdb_loc (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST obj
          sal = find_pc_line (selected_frame->pc,
                              selected_frame->next != NULL
                              && !(get_frame_type (selected_frame->next) == SIGTRAMP_FRAME)
-                             && !deprecated_frame_in_dummy (selected_frame->next));
+                             && !(get_frame_type (selected_frame->next) == DUMMY_FRAME));
        }
       else
         {

diff --git a/gdb/gdbtk/generic/gdbtk-stack.c b/gdb/gdbtk/generic/gdbtk-stack.c
index 0f43f97..abbff62 100644 (file)
--- a/gdb/gdbtk/generic/gdbtk-stack.c
+++ b/gdb/gdbtk/generic/gdbtk-stack.c
@@ -522,7 +522,7 @@ get_frame_name (Tcl_Interp *interp, Tcl_Obj *list, struct frame_info *fi)
   enum language funlang = language_unknown;
   Tcl_Obj *objv[1];
 
-  if (deprecated_frame_in_dummy (fi))
+  if (get_frame_type (fi) == DUMMY_FRAME)
     {
       objv[0] = Tcl_NewStringObj ("<function called from gdb>\n", -1);
       Tcl_ListObjAppendElement (interp, list, objv[0]);
@@ -539,7 +539,7 @@ get_frame_name (Tcl_Interp *interp, Tcl_Obj *list, struct frame_info *fi)
     find_pc_line (fi->pc,
                  fi->next != NULL
                  && !(get_frame_type (fi) == SIGTRAMP_FRAME)
-                 && !deprecated_frame_in_dummy (fi->next));
+                 && !(get_frame_type (fi) == DUMMY_FRAME));
 
   func = find_pc_function (fi->pc);
   if (func)