--- a/JavaClassPointerRef.st Wed Mar 26 17:25:36 1997 +0000
+++ b/JavaClassPointerRef.st Mon Apr 07 17:28:23 1997 +0000
@@ -8,6 +8,16 @@
!JavaClassPointerRef methodsFor:'accessing'!
+arrayClass
+ class isJavaClass ifTrue:[
+ ^ Array
+ ].
+ ^ class
+
+ "Created: 7.4.1997 / 13:46:12 / cg"
+ "Modified: 7.4.1997 / 13:47:17 / cg"
+!
+
javaClass
class isUnresolved ifTrue:[
self halt.
@@ -17,8 +27,16 @@
"Created: 25.6.1996 / 09:36:09 / cg"
! !
+!JavaClassPointerRef methodsFor:'converting'!
+
+asClassPointerRef
+ ^ self
+
+ "Created: 7.4.1997 / 13:40:42 / cg"
+! !
+
!JavaClassPointerRef class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassPointerRef.st,v 1.3 1997/02/07 20:36:13 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassPointerRef.st,v 1.4 1997/04/07 17:26:38 cg Exp $'
! !