JavaClassReader.st
changeset 72 9427aa6a8528
parent 71 feb1b4907dd4
child 73 a1268823f1a4
equal deleted inserted replaced
71:feb1b4907dd4 72:9427aa6a8528
    18     "
    18     "
    19 !
    19 !
    20 
    20 
    21 initializeClassPath
    21 initializeClassPath
    22     self initializeClassPath:#('/home/cg/java/').
    22     self initializeClassPath:#('/home/cg/java/').
    23     self initializeClassPath:#('/home/cg/java/JDK/classes/').
    23     self initializeClassPath:#('/home/cg/java/JDK/classes/' '/home/cg/java/JWS/classes' ).
    24 
    24 
    25 "/    self initializeClassPath:#(
    25 "/    self initializeClassPath:#(
    26 "/                        '/phys/ibm3/java/lib/'
    26 "/                        '/phys/ibm3/java/lib/'
    27 "/                        '/phys/ibm3/hotjava/classes/'
    27 "/                        '/phys/ibm3/hotjava/classes/'
    28 "/                  )
    28 "/                  )
   325             super_class := existingSuperClass
   325             super_class := existingSuperClass
   326         ] ifFalse:[
   326         ] ifFalse:[
   327             (super_class isMemberOf:JavaUnresolvedClassConstant) ifTrue:[
   327             (super_class isMemberOf:JavaUnresolvedClassConstant) ifTrue:[
   328                 existingSuperClass := super_class resolve.
   328                 existingSuperClass := super_class resolve.
   329                 existingSuperClass isNil ifTrue:[
   329                 existingSuperClass isNil ifTrue:[
   330                     super_class := self class 
   330                     existingSuperClass := self class 
   331                                         loadClassLazy:(super_class fullName)
   331                                         loadClassLazy:(super_class fullName)
   332                                         ignoring:classesbeingLoaded.
   332                                         ignoring:classesbeingLoaded.
   333                 ].
   333                 ].
   334                 super_class isNil ifTrue:[
   334                 existingSuperClass isNil ifTrue:[
   335                     self halt:('cannot find superclass: ' , super_class fullName).
   335                     self halt:('cannot find superclass: ' , super_class fullName).
   336                 ]
   336                 ].
       
   337                 super_class := existingSuperClass
   337             ].
   338             ].
   338         ].
   339         ].
   339     ].
   340     ].
   340 
   341 
   341     "/
   342     "/
  1193 ! !
  1194 ! !
  1194 
  1195 
  1195 !JavaClassReader  class methodsFor:'documentation'!
  1196 !JavaClassReader  class methodsFor:'documentation'!
  1196 
  1197 
  1197 version
  1198 version
  1198     ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassReader.st,v 1.24 1996/06/25 19:55:43 cg Exp $'
  1199     ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassReader.st,v 1.25 1996/06/26 07:46:13 cg Exp $'
  1199 ! !
  1200 ! !
  1200 JavaClassReader initialize!
  1201 JavaClassReader initialize!