Changeset 600

Timestamp:

Aug 20, 2008, 3:40:28 AM (16 years ago)

Author:

イグトランス (egtra)

Message:

CriticalSectionLockのImplements IDisoposeをコメントアウト解除

File:

• trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/CriticalSection.ab (modified) (2 diffs)

trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/CriticalSection.ab

@@ -35 +35 @@
 
 Class CriticalSectionLock
-'   Inherits System.IDisposable
+    Implements System.IDisposable
 Public
     Sub CriticalSectionLock(ByRef cs As CRITICAL_SECTION)
@@ -50 +50 @@
     End Sub
 
-    /*Override*/ Sub Dispose()
+    Virtual Sub Dispose()
 '       Dim pcsOld = ActiveBasic.Windows.Detail.InterlockedExchangeAnyPointer(pcs, 0)
         Dim pcsOld = InterlockedExchangePointer(ByVal VarPtr(pcs) As *VoidPtr, 0) As *CRITICAL_SECTION