Changeset 600


Ignore:
Timestamp:
Aug 20, 2008, 3:40:28 AM (16 years ago)
Author:
イグトランス (egtra)
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/CriticalSection.ab

    r439 r600  
    3535
    3636Class CriticalSectionLock
    37 '   Inherits System.IDisposable
     37    Implements System.IDisposable
    3838Public
    3939    Sub CriticalSectionLock(ByRef cs As CRITICAL_SECTION)
     
    5050    End Sub
    5151
    52     /*Override*/ Sub Dispose()
     52    Virtual Sub Dispose()
    5353'       Dim pcsOld = ActiveBasic.Windows.Detail.InterlockedExchangeAnyPointer(pcs, 0)
    5454        Dim pcsOld = InterlockedExchangePointer(ByVal VarPtr(pcs) As *VoidPtr, 0) As *CRITICAL_SECTION
Note: See TracChangeset for help on using the changeset viewer.