JavaRef2.st
branchdevelopment
changeset 2711 a00302fe5083
parent 2429 ebece4dcaab9
child 2731 13f5be2bf83b
equal deleted inserted replaced
2710:78c4f4a03914 2711:a00302fe5083
    51      as of 1.9.2010
    51      as of 1.9.2010
    52 
    52 
    53 "
    53 "
    54 ! !
    54 ! !
    55 
    55 
    56 
       
    57 !JavaRef2 class methodsFor:'instance creation'!
    56 !JavaRef2 class methodsFor:'instance creation'!
    58 
    57 
    59 new
    58 new
    60     "Don't call me directly"
    59     "Don't call me directly"
    61     
    60     
    65     ^ self basicNew initialize.
    64     ^ self basicNew initialize.
    66 
    65 
    67     "Modified: / 06-12-2011 / 17:02:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
    66     "Modified: / 06-12-2011 / 17:02:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
    68 ! !
    67 ! !
    69 
    68 
    70 
       
    71 !JavaRef2 methodsFor:'accessing'!
    69 !JavaRef2 methodsFor:'accessing'!
    72 
    70 
    73 constantPool
    71 constantPool
    74 ^constantPool.
    72 ^constantPool.
    75 
    73 
   111     ^ valueCache.
   109     ^ valueCache.
   112 
   110 
   113     "Created: / 08-04-2011 / 11:37:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   111     "Created: / 08-04-2011 / 11:37:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   114 ! !
   112 ! !
   115 
   113 
   116 
       
   117 !JavaRef2 methodsFor:'comparing'!
   114 !JavaRef2 methodsFor:'comparing'!
   118 
   115 
   119 = anotherJavaRef
   116 = anotherJavaRef
   120 ^ self subclassResponsibility.
   117 ^ self subclassResponsibility.
   121 
   118 
   126 
   123 
   127 ^ self subclassResponsibility.
   124 ^ self subclassResponsibility.
   128 
   125 
   129     "Created: / 08-04-2011 / 12:15:51 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   126     "Created: / 08-04-2011 / 12:15:51 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   130 ! !
   127 ! !
   131 
       
   132 
   128 
   133 !JavaRef2 methodsFor:'initialization'!
   129 !JavaRef2 methodsFor:'initialization'!
   134 
   130 
   135 initialize
   131 initialize
   136     valueCache := nil.
   132     valueCache := nil.
   137     super initialize.
   133     super initialize.
   138 
   134 
   139     "Modified: / 08-04-2011 / 17:39:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   135     "Modified: / 08-04-2011 / 17:39:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   140 ! !
   136 ! !
   141 
   137 
   142 
       
   143 !JavaRef2 methodsFor:'logging'!
   138 !JavaRef2 methodsFor:'logging'!
   144 
   139 
   145 info: arg
   140 info: arg
   146 
   141 
   147     Logger log: arg severity: #info facility: 'JVM'
   142     Logger log: arg severity: #info facility: 'JVM'
   156 
   151 
   157     "Created: / 10-05-2011 / 15:01:08 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   152     "Created: / 10-05-2011 / 15:01:08 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   158     "Modified: / 14-09-2011 / 21:47:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   153     "Modified: / 14-09-2011 / 21:47:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   159 ! !
   154 ! !
   160 
   155 
   161 
       
   162 !JavaRef2 methodsFor:'printing'!
   156 !JavaRef2 methodsFor:'printing'!
   163 
   157 
   164 displayString
   158 displayString
   165 
   159 
   166     ^self subclassResponsibility
   160     ^self subclassResponsibility
   167 
   161 
   168     "Created: / 14-08-2011 / 21:18:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   162     "Created: / 14-08-2011 / 21:18:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   169 ! !
   163 ! !
   170 
       
   171 
   164 
   172 !JavaRef2 methodsFor:'private - resolving'!
   165 !JavaRef2 methodsFor:'private - resolving'!
   173 
   166 
   174 findResolvedValue
   167 findResolvedValue
   175     self findResolvedValue: true.
   168     self findResolvedValue: true.
   185 
   178 
   186     "Created: / 09-02-2012 / 23:08:15 / mh <hlopik@gmail.com>"
   179     "Created: / 09-02-2012 / 23:08:15 / mh <hlopik@gmail.com>"
   187     "Modified: / 10-04-2012 / 09:31:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   180     "Modified: / 10-04-2012 / 09:31:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   188 ! !
   181 ! !
   189 
   182 
   190 
       
   191 !JavaRef2 methodsFor:'queries'!
   183 !JavaRef2 methodsFor:'queries'!
   192 
   184 
   193 isJavaRef
   185 isJavaRef
   194 "return true if object represents reference in java constant pool"
   186 "return true if object represents reference in java constant pool"
   195 ^ true.
   187 ^ true.
   202     
   194     
   203     ^ true.
   195     ^ true.
   204 
   196 
   205     "Created: / 10-05-2011 / 12:20:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   197     "Created: / 10-05-2011 / 12:20:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   206 ! !
   198 ! !
   207 
       
   208 
   199 
   209 !JavaRef2 methodsFor:'resolving'!
   200 !JavaRef2 methodsFor:'resolving'!
   210 
   201 
   211 invalidate
   202 invalidate
   212     "Invalidate reference. Cache will be cleared and next call to resolve will cause resolving from scratch."
   203     "Invalidate reference. Cache will be cleared and next call to resolve will cause resolving from scratch."
   286 
   277 
   287     "Created: / 10-05-2011 / 16:50:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   278     "Created: / 10-05-2011 / 16:50:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   288     "Modified: / 04-06-2011 / 17:54:16 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   279     "Modified: / 04-06-2011 / 17:54:16 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   289 ! !
   280 ! !
   290 
   281 
   291 
       
   292 !JavaRef2 methodsFor:'testing'!
   282 !JavaRef2 methodsFor:'testing'!
   293 
   283 
   294 isUnresolved
   284 isUnresolved
   295 
   285 
   296     ^valueCache isNil
   286     ^valueCache isNil
   297 
   287 
   298     "Created: / 22-05-2011 / 14:01:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   288     "Created: / 22-05-2011 / 14:01:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   299 ! !
   289 ! !
   300 
   290 
   301 
       
   302 !JavaRef2 class methodsFor:'documentation'!
   291 !JavaRef2 class methodsFor:'documentation'!
   303 
   292 
   304 version_CVS
   293 version_CVS
   305     ^ '$Header: /cvs/stx/stx/libjava/JavaRef2.st,v 1.4 2013-02-25 11:15:31 vrany Exp $'
   294     ^ '$Header$'
   306 !
   295 !
   307 
   296 
   308 version_HG
   297 version_HG
   309 
   298 
   310     ^ '$Changeset: <not expanded> $'
   299     ^ '$Changeset: <not expanded> $'