Make ptid_t related changes.

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index 9c2ed24..9e9a574 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,14 @@
+2001-05-06  Kevin Buettner  <kevinb@redhat.com>
+
+       * generic/gdbtk-cmds.c (gdb_target_has_execution_command)
+       (get_clear_file): Use ptid_equal() for comparing ptid values. 
+       Use ``null_ptid'' instead of 0 in comparisons against
+       ``inferior_ptid''.
+
+       From Phil Edwards <pedwards@disaster.jaj.com>:
+       * generic/gdbtk-cmds.c (gdb_target_has_execution_command)
+       (get_clear_file): Rename ``inferior_pid'' to ``inferior_ptid''.
+
 2001-05-01  Keith Seitz  <keiths@cygnus.com>
 
         * gdbtk.c (gdbtk_init): Include the command "warp_pointer"

diff --git a/gdb/gdbtk/generic/gdbtk-cmds.c b/gdb/gdbtk/generic/gdbtk-cmds.c
index 08b5a92..dcf533a 100644 (file)
--- a/gdb/gdbtk/generic/gdbtk-cmds.c
+++ b/gdb/gdbtk/generic/gdbtk-cmds.c
@@ -624,7 +624,7 @@ gdb_clear_file (clientData, interp, objc, objv)
       return TCL_ERROR;
     }
 
-  if (inferior_pid != 0 && target_has_execution)
+  if (! ptid_equal (inferior_ptid, null_ptid) && target_has_execution)
     {
       if (attach_flag)
        target_detach (NULL, 0);
@@ -981,7 +981,7 @@ gdb_target_has_execution_command (clientData, interp, objc, objv)
 {
   int result = 0;
 
-  if (target_has_execution && inferior_pid != 0)
+  if (target_has_execution && ! ptid_equal (inferior_ptid, null_ptid))
     result = 1;
 
   Tcl_SetBooleanObj (result_ptr->obj_ptr, result);