Changeset 170 for Include/system/gc.sbp

Timestamp:

Mar 16, 2007, 10:01:14 AM (18 years ago)

Author:

イグトランス (egtra)

Message:

winnt.ab, windef.ab, guiddef.abを導入

File:

• Include/system/gc.sbp (modified) (4 diffs)

Include/system/gc.sbp

@@ -19 +19 @@
 Const _System_GC_FLAG_INITZERO = 4
 Const _System_GC_FLAG_OBJECT = 8
-
-Const THREAD_GET_CONTEXT  = &H0008
 
 Class _System_CGarbageCollection
@@ -122 +120 @@
     End Sub
 
-    Sub add(new_ptr As VoidPtr, size As SIZE_T,flags As DWord)
+    Sub add(new_ptr As VoidPtr, size As SIZE_T, flags As DWord)
         iAllSize+=size
 
@@ -239 +237 @@
                 If pbMark[index]=0 Then
                     pbMark[index]=1
-                    
+
                     If (pdwFlags[index] and _System_GC_FLAG_ATOMIC)=0 Then
                         'ヒープ領域がポインタ値を含む可能性があるとき
                         If ppPtr[index] = 0 Then
                             'エラー
-                            
+
                         End If
                         Scan(ppPtr[index] As *LONG_PTR,pSize[index],pbMark)
@@ -426 +424 @@
             OutputDebugString( Ex"Object dump complete.\r\n" )
         End If
-        
+
     End Sub