--- a/GDBVariable.st	Sun Feb 04 21:18:15 2018 +0000
+++ b/GDBVariable.st	Sun Feb 04 23:37:35 2018 +0000
@@ -20,7 +20,7 @@
 
 "{ NameSpace: Smalltalk }"
 
-GDBTransientObject subclass:#GDBVariable
+GDBDebuggerObject subclass:#GDBVariable
 	instanceVariableNames:'frame name value varobj'
 	classVariableNames:''
 	poolDictionaries:''
@@ -122,9 +122,10 @@
     self assert: frame isNil.
     self assert: (debugger isNil or:[ debugger == aGDBFrame debugger ]).
     frame := aGDBFrame.
-    self debugger: frame debugger.
+    self setDebugger: frame debugger.
 
     "Created: / 27-02-2015 / 17:08:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-02-2018 / 21:41:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 setValue: aString
@@ -173,6 +174,14 @@
     "Modified (comment): / 12-06-2017 / 09:26:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBVariable methodsFor:'testing'!
+
+isValid
+    ^ frame isValid
+
+    "Created: / 04-02-2018 / 21:32:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GDBVariable class methodsFor:'documentation'!
 
 version_HG