Changeset 581 for trunk/ab5.0/ablib/src/Classes/System/Threading

Timestamp:

Aug 9, 2008, 1:32:26 PM (16 years ago)

Author:

イグトランス (egtra)

Message:

Unicodeコンパイルで問題になる部分を修正

File:

• trunk/ab5.0/ablib/src/Classes/System/Threading/WaitHandle.ab (modified) (1 diff)

trunk/ab5.0/ablib/src/Classes/System/Threading/WaitHandle.ab

@@ -87 +87 @@
 
     Static Function SignalAndWait(toSignal As WaitHandle, toWaitOn As WaitHandle, millisecondsTimeout As Long, exitContext As Boolean) As Boolean
-        Dim pSignalObjectAndWait = GetProcAddress(GetModuleHandle("Kernel32.dll"), "SignalObjectAndWait") As Detail.PFNSignalObjectAndWait
+        Dim pSignalObjectAndWait = GetProcAddress(GetModuleHandle("Kernel32.dll"), ToMBStr("SignalObjectAndWait")) As Detail.PFNSignalObjectAndWait
         If pSignalObjectAndWait = 0 Then
             Throw New PlatformNotSupportedException("WaitHandle.SignalAndWait: This platform doesn't supoort this operation.")