JavaClassPointerRef.st
changeset 222 f43573e3358c
parent 168 90e39cb3fa04
child 229 b91c9462ac83
--- a/JavaClassPointerRef.st	Thu Aug 14 15:29:58 1997 +0000
+++ b/JavaClassPointerRef.st	Thu Aug 14 17:02:26 1997 +0000
@@ -1,5 +1,5 @@
 JavaClassRef subclass:#JavaClassPointerRef
-	instanceVariableNames:''
+	instanceVariableNames:'deref'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Java-Reader-Support'
@@ -33,10 +33,23 @@
      ^ self
 
     "Created: 7.4.1997 / 13:40:42 / cg"
+!
+
+deref
+    "dereference my type; return a new JavaClassPointerRef"
+
+    "/ cache
+    deref notNil ifTrue:[^ deref].
+
+    "/ todo: dereference & remember in deref cache
+    self halt
+
+    "Created: 14.8.1997 / 16:55:56 / cg"
+    "Modified: 14.8.1997 / 19:02:21 / cg"
 ! !
 
 !JavaClassPointerRef class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassPointerRef.st,v 1.4 1997/04/07 17:26:38 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassPointerRef.st,v 1.5 1997/08/14 17:02:26 cg Exp $'
 ! !