JavaObject.st
changeset 2396 fadc6d7a2f5b
parent 2353 fa7400d022a0
child 2429 ebece4dcaab9
child 2678 c865275e48a7
equal deleted inserted replaced
2390:47358426d752 2396:fadc6d7a2f5b
    77     [see also:]
    77     [see also:]
    78 
    78 
    79 "
    79 "
    80 ! !
    80 ! !
    81 
    81 
       
    82 
    82 !JavaObject class methodsFor:'misc'!
    83 !JavaObject class methodsFor:'misc'!
    83 
    84 
    84 resolveClassRefs
    85 resolveClassRefs
    85 !
    86 !
    86 
    87 
    87 resolveClassRefsIgnoring:setOfClasses
    88 resolveClassRefsIgnoring:setOfClasses
    88 ! !
    89 ! !
       
    90 
    89 
    91 
    90 !JavaObject class methodsFor:'smalltalk interface'!
    92 !JavaObject class methodsFor:'smalltalk interface'!
    91 
    93 
    92 convertJavaObject:val signature:retValSignature
    94 convertJavaObject:val signature:retValSignature
    93 ^ val.
    95 ^ val.
   149     ^ Java as_ST_String:aJavaString
   151     ^ Java as_ST_String:aJavaString
   150 
   152 
   151     "Modified: 8.8.1997 / 12:07:29 / cg"
   153     "Modified: 8.8.1997 / 12:07:29 / cg"
   152 ! !
   154 ! !
   153 
   155 
       
   156 
   154 !JavaObject methodsFor:'accessing-Java'!
   157 !JavaObject methodsFor:'accessing-Java'!
   155 
   158 
   156 getJavaLockWord
   159 getJavaLockWord
   157     "Returns a Java lock word for given object. The returned
   160     "Returns a Java lock word for given object. The returned
   158      value is 
   161      value is 
   192 
   195 
   193     ^_lockWord_ := lockWordOrJavaMonitor
   196     ^_lockWord_ := lockWordOrJavaMonitor
   194 
   197 
   195     "Created: / 26-08-2012 / 14:07:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   198     "Created: / 26-08-2012 / 14:07:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   196 ! !
   199 ! !
       
   200 
   197 
   201 
   198 !JavaObject methodsFor:'exception handling support'!
   202 !JavaObject methodsFor:'exception handling support'!
   199 
   203 
   200 catchInDebugger
   204 catchInDebugger
   201    "if set, the debugger will handle this signal in its event loop and will close itself
   205    "if set, the debugger will handle this signal in its event loop and will close itself
   242     ^super signal
   246     ^super signal
   243 
   247 
   244     "Created: / 20-08-2012 / 14:15:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   248     "Created: / 20-08-2012 / 14:15:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   245 ! !
   249 ! !
   246 
   250 
       
   251 
   247 !JavaObject methodsFor:'finalization'!
   252 !JavaObject methodsFor:'finalization'!
   248 
   253 
   249 finalizationLobby
   254 finalizationLobby
   250 
   255 
   251 "/    ^super finalizationLobby
   256 "/    ^super finalizationLobby
   252 
   257 
   253     ^JavaVM finalizationLobby "/ Do not use this yet!!
   258     ^JavaVM finalizationLobby "/ Do not use this yet!!
   254 
   259 
   255     "Created: / 24-07-2012 / 01:04:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   260     "Created: / 24-07-2012 / 01:04:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   256 ! !
   261 ! !
       
   262 
   257 
   263 
   258 !JavaObject methodsFor:'initialization'!
   264 !JavaObject methodsFor:'initialization'!
   259 
   265 
   260 initialize
   266 initialize
   261     self perform:#'<init>()V'.
   267     self perform:#'<init>()V'.
   269     sz := self class instSize.
   275     sz := self class instSize.
   270     1 to:sz do:[:i |
   276     1 to:sz do:[:i |
   271 	self instVarAt:i put:0
   277 	self instVarAt:i put:0
   272     ]
   278     ]
   273 ! !
   279 ! !
       
   280 
   274 
   281 
   275 !JavaObject methodsFor:'inspecting'!
   282 !JavaObject methodsFor:'inspecting'!
   276 
   283 
   277 inspectorExtraAttributes
   284 inspectorExtraAttributes
   278 
   285 
   291     ^attrs
   298     ^attrs
   292 
   299 
   293     "Created: / 04-12-2011 / 19:28:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   300     "Created: / 04-12-2011 / 19:28:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   294 ! !
   301 ! !
   295 
   302 
       
   303 
   296 !JavaObject methodsFor:'message sending'!
   304 !JavaObject methodsFor:'message sending'!
   297 
   305 
   298 doesNotUnderstand:aMessage
   306 doesNotUnderstand:aMessage
   299     | sender |
   307     | sender |
   300     sender := thisContext sender.
   308     sender := thisContext sender.
   303     "Modified: / 16-11-1998 / 16:50:56 / cg"
   311     "Modified: / 16-11-1998 / 16:50:56 / cg"
   304     "Modified: / 19-09-2011 / 23:43:56 / Jan Kurs <kursjan@fit.cvut.cz>"
   312     "Modified: / 19-09-2011 / 23:43:56 / Jan Kurs <kursjan@fit.cvut.cz>"
   305     "Modified: / 15-12-2011 / 23:43:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   313     "Modified: / 15-12-2011 / 23:43:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   306     "Modified: / 01-01-2012 / 19:49:35 / kursjan <kursjan@fit.cvut.cz>"
   314     "Modified: / 01-01-2012 / 19:49:35 / kursjan <kursjan@fit.cvut.cz>"
   307 ! !
   315 ! !
       
   316 
   308 
   317 
   309 !JavaObject methodsFor:'printing & storing'!
   318 !JavaObject methodsFor:'printing & storing'!
   310 
   319 
   311 basicPrintOn: aStream
   320 basicPrintOn: aStream
   312     aStream nextPutAll: self class name.
   321     aStream nextPutAll: self class name.
   379     super printOn: aStream.
   388     super printOn: aStream.
   380 
   389 
   381     "Created: / 04-12-2011 / 10:29:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   390     "Created: / 04-12-2011 / 10:29:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   382 ! !
   391 ! !
   383 
   392 
       
   393 
   384 !JavaObject methodsFor:'queries'!
   394 !JavaObject methodsFor:'queries'!
   385 
   395 
   386 isJavaClassRef
   396 isJavaClassRef
   387     ^ false
   397     ^ false
   388 
   398 
   410         super size.    
   420         super size.    
   411     ]
   421     ]
   412 
   422 
   413     "Created: / 29-02-2012 / 14:25:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   423     "Created: / 29-02-2012 / 14:25:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   414 ! !
   424 ! !
       
   425 
   415 
   426 
   416 !JavaObject methodsFor:'smalltalk interface'!
   427 !JavaObject methodsFor:'smalltalk interface'!
   417 
   428 
   418 lookupMethod:selector numArgs:nargs
   429 lookupMethod:selector numArgs:nargs
   419     "lookup a method"
   430     "lookup a method"
   468     "
   479     "
   469 
   480 
   470     "Modified: 22.3.1997 / 00:56:54 / cg"
   481     "Modified: 22.3.1997 / 00:56:54 / cg"
   471 ! !
   482 ! !
   472 
   483 
       
   484 
   473 !JavaObject methodsFor:'unwind'!
   485 !JavaObject methodsFor:'unwind'!
   474 
   486 
   475 unwindHandlerInContext: aContext 
   487 unwindHandlerInContext: aContext 
   476     "given a context which has been marked for unwind,
   488     "given a context which has been marked for unwind,
   477      retrieve the handler block. This method is called when ST
   489      retrieve the handler block. This method is called when ST
   481     ^ JavaVM unwindHandlerForJavaContext: aContext.
   493     ^ JavaVM unwindHandlerForJavaContext: aContext.
   482 
   494 
   483     "Created: / 08-11-2011 / 12:25:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   495     "Created: / 08-11-2011 / 12:25:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
   484 ! !
   496 ! !
   485 
   497 
       
   498 
   486 !JavaObject class methodsFor:'documentation'!
   499 !JavaObject class methodsFor:'documentation'!
   487 
   500 
   488 version
   501 version
   489     ^ '$Header: /cvs/stx/stx/libjava/JavaObject.st,v 1.57 2013-02-16 18:08:32 vrany Exp $'
   502     ^ '$Header: /cvs/stx/stx/libjava/JavaObject.st,v 1.58 2013-02-25 11:15:31 vrany Exp $'
   490 !
   503 !
   491 
   504 
   492 version_CVS
   505 version_CVS
   493     ^ '$Header: /cvs/stx/stx/libjava/JavaObject.st,v 1.57 2013-02-16 18:08:32 vrany Exp $'
   506     ^ '$Header: /cvs/stx/stx/libjava/JavaObject.st,v 1.58 2013-02-25 11:15:31 vrany Exp $'
   494 !
   507 !
   495 
   508 
   496 version_HG
   509 version_HG
   497 
   510 
   498     ^ '$Changeset: <not expanded> $'
   511     ^ '$Changeset: <not expanded> $'