author | Stefan Vogel <sv@exept.de> |
Fri, 15 Nov 2019 20:05:05 +0100 | |
changeset 24903 | 5994d90bff22 |
parent 24902 | 5967e3c82158 |
child 24915 | 9b05c18790b2 |
RecursionLock.st | file | annotate | diff | comparison | revisions |
--- a/RecursionLock.st Fri Nov 15 20:01:21 2019 +0100 +++ b/RecursionLock.st Fri Nov 15 20:05:05 2019 +0100 @@ -145,6 +145,14 @@ !RecursionLock methodsFor:'queries'! +isOwnedByActiveProcess + "answer true, if the activeProcess has already acquired the lock." + + ^ Processor activeProcess == process + + "Created: / 15-11-2019 / 16:04:06 / Stefan Vogel" +! + owner "return the owning processes (or nil)"