SharedCollection.st
changeset 4941 148b29bdda05
parent 4940 d5d7391bc875
child 5138 0793a0374d2a
equal deleted inserted replaced
4940:d5d7391bc875 4941:148b29bdda05
   198 
   198 
   199     "Created: / 22-11-2010 / 20:59:01 / cg"
   199     "Created: / 22-11-2010 / 20:59:01 / cg"
   200     "Modified: / 02-02-2017 / 11:40:56 / stefan"
   200     "Modified: / 02-02-2017 / 11:40:56 / stefan"
   201 !
   201 !
   202 
   202 
       
   203 last
       
   204     ^ accessLock critical:[
       
   205         realCollection last
       
   206     ].
       
   207 
       
   208     "Created: / 06-05-2019 / 18:51:26 / Claus Gittinger"
       
   209 !
       
   210 
   203 notEmpty
   211 notEmpty
   204     ^ accessLock critical:[
   212     ^ accessLock critical:[
   205         realCollection notEmpty
   213         realCollection notEmpty
   206     ].
   214     ].
   207 
   215