Changeset 234 for Include


Ignore:
Timestamp:
May 7, 2007, 2:43:54 AM (18 years ago)
Author:
dai
Message:

スレッド管理クラスで起きているメモリリークを解消

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Include/Classes/System/Threading/Thread.ab

    r232 r234  
    184184
    185185    Sub ~_System_CThreadCollection()
     186        Dim i As Long
     187        For i=0 To ELM(ThreadNum)
     188            If ppobj_Thread[i] Then
     189                If i = 0 Then
     190                    Delete ppobj_Thread[i]
     191                End If
     192                ppobj_Thread[i]=0
     193                pStackBase[i]=0
     194                Delete ppException[i]
     195                ppException[i]=0
     196                Exit For
     197            End If
     198        Next
     199
    186200        HeapFree(_System_hProcessHeap,0,pStackBase)
    187201        pStackBase=0
Note: See TracChangeset for help on using the changeset viewer.