From: 2002-11-11 David Carlton <carlton@math.stanford.edu>

	* generic/gdbtk-stack.c (get_frame_name): Replace call to
	frame_in_dummy with one to deprecated_frame_in_dummy.
	* generic/gdbtk-cmds.c (gdb_loc): Ditto.

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index fe0d879..fcb5521 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,10 @@
+2002-11-12  Andrew Cagney  <ac131313@redhat.com>
+
+       From 2002-11-11 David Carlton <carlton@math.stanford.edu>
+       * generic/gdbtk-stack.c (get_frame_name): Replace call to
+       frame_in_dummy with one to deprecated_frame_in_dummy.
+       * generic/gdbtk-cmds.c (gdb_loc): Ditto.
+
 2002-11-11  Martin M. Hunt  <hunt@redhat.com>  
 
        * library/srctextwin.itb (do_key): Add arg to

diff --git a/gdb/gdbtk/generic/gdbtk-cmds.c b/gdb/gdbtk/generic/gdbtk-cmds.c
index d885261..3fc06e2 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
                              && !selected_frame->next->signal_handler_caller
-                             && !frame_in_dummy (selected_frame->next));
+                             && !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 ab40744..a2a9d8f 100644 (file)
--- a/gdb/gdbtk/generic/gdbtk-stack.c
+++ b/gdb/gdbtk/generic/gdbtk-stack.c
@@ -520,7 +520,7 @@ get_frame_name (Tcl_Interp *interp, Tcl_Obj *list, struct frame_info *fi)
   enum language funlang = language_unknown;
   Tcl_Obj *objv[1];
 
-  if (frame_in_dummy (fi))
+  if (deprecated_frame_in_dummy (fi))
     {
       objv[0] = Tcl_NewStringObj ("<function called from gdb>\n", -1);
       Tcl_ListObjAppendElement (interp, list, objv[0]);
@@ -537,7 +537,7 @@ get_frame_name (Tcl_Interp *interp, Tcl_Obj *list, struct frame_info *fi)
     find_pc_line (fi->pc,
                  fi->next != NULL
                  && !fi->next->signal_handler_caller
-                 && !frame_in_dummy (fi->next));
+                 && !deprecated_frame_in_dummy (fi->next));
 
   func = find_pc_function (fi->pc);
   if (func)