2001-03-29 Fernando Nasser <fnasser@redhat.com>

	* gdbtk-varobj.c (variable_obj_command): Do not cache varobj handles as
	they may change -- use varobj_get_handle() instead.

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index c95a880..332841c 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,8 @@
+2001-03-29  Fernando Nasser  <fnasser@redhat.com>
+
+       * gdbtk-varobj.c (variable_obj_command): Do not cache varobj handles as
+       they may change -- use varobj_get_handle() instead.
+
 2001-03-15  Martin Hunt  <hunt@redhat.com>
        * library/browserwin.itb: Change all references to freeze_me,
        thaw_me and Top to _freeze_me, _thaw_me, and _top to match 

diff --git a/gdb/gdbtk/generic/gdbtk-varobj.c b/gdb/gdbtk/generic/gdbtk-varobj.c
index 588a27c..002451d 100644 (file)
--- a/gdb/gdbtk/generic/gdbtk-varobj.c
+++ b/gdb/gdbtk/generic/gdbtk-varobj.c
@@ -201,8 +201,16 @@ variable_obj_command (clientData, interp, objc, objv)
     "update",
     NULL
   };
-  struct varobj *var = (struct varobj *) clientData;
+  struct varobj *var;
+  char *varobj_name;
   int index, result;
+  
+  /* Get the current handle for this variable token (name). */
+  varobj_name = Tcl_GetStringFromObj (objv[0], NULL);
+  if (varobj_name == NULL)
+    return TCL_ERROR;
+  var = varobj_get_handle (varobj_name);
+  
 
   if (objc < 2)
     {