40     like a Semaphore for mutual exclusion, but avoids the deadlock

    40     like a Semaphore for mutual exclusion, but avoids the deadlock

    41     if a critical region is reentered by the same process again.

    41     if a critical region is reentered by the same process again.

    42     I.e. allows reentering the critical region if the current process 

    42     I.e. allows reentering the critical region if the current process 

    43     is the one which did the original locking.

    43     is the one which did the original locking.

    44 

    44 

    45     example:

    53     example:

    46 

    54 

    47         |lock|

    55         |lock|

    48 

    56 

    49         lock := RecursionLock new.

    57         lock := RecursionLock new.

   142 ! !

   150 ! !

   143 

   151 

   144 !RecursionLock class methodsFor:'documentation'!

   152 !RecursionLock class methodsFor:'documentation'!

   145 

   153 

   146 version

   154 version

   148 ! !

   156 ! !