RecursionLock.st
branchjv
changeset 18079 7b5afc0ad3d5
parent 18027 3621469cc5e8
parent 15550 8036fe8c032d
child 18120 e3a375d5f6a8
equal deleted inserted replaced
18078:7ef3221b036d 18079:7b5afc0ad3d5
   164     ^ process
   164     ^ process
   165 !
   165 !
   166 
   166 
   167 wouldBlock
   167 wouldBlock
   168     "Check if the resource represented by the receiver is  
   168     "Check if the resource represented by the receiver is  
   169      already in use by another Process."
   169      already in use by another process.
       
   170      Attention: if asked without some global lock (blockedInterrupts),
       
   171      the returned value may be outdated right away."
   170 
   172 
   171     ^ process notNil and:[Processor activeProcess ~~ process]
   173     ^ process notNil and:[Processor activeProcess ~~ process]
   172 ! !
   174 ! !
   173 
   175 
   174 !RecursionLock methodsFor:'waiting'!
   176 !RecursionLock methodsFor:'waiting'!
   298 ! !
   300 ! !
   299 
   301 
   300 !RecursionLock class methodsFor:'documentation'!
   302 !RecursionLock class methodsFor:'documentation'!
   301 
   303 
   302 version
   304 version
   303     ^ '$Header: /cvs/stx/stx/libbasic/RecursionLock.st,v 1.38 2013-02-08 21:13:20 stefan Exp $'
   305     ^ '$Header: /cvs/stx/stx/libbasic/RecursionLock.st,v 1.39 2013-07-25 09:22:03 cg Exp $'
   304 !
   306 !
   305 
   307 
   306 version_CVS
   308 version_CVS
   307     ^ '$Header: /cvs/stx/stx/libbasic/RecursionLock.st,v 1.38 2013-02-08 21:13:20 stefan Exp $'
   309     ^ '$Header: /cvs/stx/stx/libbasic/RecursionLock.st,v 1.39 2013-07-25 09:22:03 cg Exp $'
   308 ! !
   310 ! !
   309 
   311