--- a/JavaUnresolvedClassConstant.st Mon May 06 10:06:41 1996 +0000
+++ b/JavaUnresolvedClassConstant.st Mon May 06 10:07:23 1996 +0000
@@ -35,7 +35,15 @@
!JavaUnresolvedClassConstant methodsFor:'resolving'!
resolve
- ^ Java classNamed:fullName.
+ |cls|
+
+ cls := Java classNamed:fullName.
+ cls isNil ifTrue:[^ self].
+
+ pool notNil ifTrue:[
+ pool at:poolIndex put:cls
+ ].
+ ^ cls
"Created: 15.4.1996 / 15:51:42 / cg"
"Modified: 15.4.1996 / 16:26:05 / cg"
@@ -61,5 +69,5 @@
!JavaUnresolvedClassConstant class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaUnresolvedClassConstant.st,v 1.7 1996/05/03 11:28:46 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaUnresolvedClassConstant.st,v 1.8 1996/05/06 10:07:09 cg Exp $'
! !