Merge pull request #4099 from cheatfate/asyncdispatch2

Proper definitions for functions СreateIoCompletionPort and GetQueuedCompletionStatus
This commit is contained in:
Andreas Rumpf 2016-04-26 16:53:40 +02:00
commit f9d9cdd1ee
2 changed files with 6 additions and 4 deletions

View file

@ -368,7 +368,7 @@ proc processTimers(p: PDispatcherBase) =
when defined(windows) or defined(nimdoc):
import winlean, sets, hashes
type
CompletionKey = Dword
CompletionKey = ULONG_PTR
CompletionData* = object
fd*: AsyncFD # TODO: Rename this.
@ -431,7 +431,7 @@ when defined(windows) or defined(nimdoc):
if timeout == -1: winlean.INFINITE
else: timeout.int32
var lpNumberOfBytesTransferred: Dword
var lpCompletionKey: ULONG
var lpCompletionKey: ULONG_PTR
var customOverlapped: PCustomOverlapped
let res = getQueuedCompletionStatus(p.ioPort,
addr lpNumberOfBytesTransferred, addr lpCompletionKey,