Get rid unsafe pointer type in GetQueuedCompletionStatus.

This commit is contained in:
Dominik Picheta 2014-04-30 17:38:44 +01:00
commit 6c4870d812
3 changed files with 7 additions and 4 deletions

View file

@ -174,7 +174,9 @@ when isMainModule:
proc cb(req: TRequest) {.async.} =
#echo(req.reqMethod, " ", req.url)
#echo(req.headers)
await req.respond(Http200, "Hello World")
let headers = {"Date": "Tue, 29 Apr 2014 23:40:08 GMT",
"Content-type": "text/plain; charset=utf-8"}
await req.respond(Http200, "Hello World", headers.newStringTable())
server.serve(TPort(5555), cb)
runForever()