Changeset 234

Timestamp:

May 7, 2007, 2:43:54 AM (18 years ago)

Author:

dai

Message:

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

File:

• Include/Classes/System/Threading/Thread.ab (modified) (1 diff)

Include/Classes/System/Threading/Thread.ab

@@ -184 +184 @@
 
     Sub ~_System_CThreadCollection()
+        Dim i As Long
+        For i=0 To ELM(ThreadNum)
+            If ppobj_Thread[i] Then
+                If i = 0 Then
+                    Delete ppobj_Thread[i]
+                End If
+                ppobj_Thread[i]=0
+                pStackBase[i]=0
+                Delete ppException[i]
+                ppException[i]=0
+                Exit For
+            End If
+        Next
+
         HeapFree(_System_hProcessHeap,0,pStackBase)
         pStackBase=0