|
@@ -427,11 +427,11 @@ Type TList
|
|
|
|
|
|
Method ObjectEnumerator:TListEnum()
|
|
Method ObjectEnumerator:TListEnum()
|
|
?Threaded
|
|
?Threaded
|
|
- LockMutex(_mutex)
|
|
|
|
|
|
+ LockMutex(TListEnum._mutex)
|
|
?
|
|
?
|
|
Local enum:TListEnum=TListEnum(TListEnum._pool.RemoveFirst())
|
|
Local enum:TListEnum=TListEnum(TListEnum._pool.RemoveFirst())
|
|
?Threaded
|
|
?Threaded
|
|
- UnlockMutex(_mutex)
|
|
|
|
|
|
+ UnlockMutex(TListEnum._mutex)
|
|
?
|
|
?
|
|
If Not enum Then
|
|
If Not enum Then
|
|
enum = New TListEnum
|
|
enum = New TListEnum
|