io.sockets.windows - Add a using, output count to fix compile error. Not bad for having no Windows box.

db4
Doug Coleman 2011-10-17 23:28:22 -07:00
parent 4493d66282
commit 24a6895436
1 changed files with 2 additions and 2 deletions

View File

@ -4,7 +4,7 @@ USING: accessors alien alien.c-types alien.data classes.struct
combinators destructors io.backend io.files.windows io.ports combinators destructors io.backend io.files.windows io.ports
io.sockets io.sockets.icmp io.sockets.private kernel libc math io.sockets io.sockets.icmp io.sockets.private kernel libc math
sequences system windows.handles windows.kernel32 windows.types sequences system windows.handles windows.kernel32 windows.types
windows.winsock ; windows.winsock locals ;
FROM: namespaces => get ; FROM: namespaces => get ;
IN: io.sockets.windows IN: io.sockets.windows
@ -252,7 +252,7 @@ TUPLE: WSARecvFrom-args port
:: parse-WSARecvFrom ( buf buf' count wsaRecvFrom -- count sockaddr ) :: parse-WSARecvFrom ( buf buf' count wsaRecvFrom -- count sockaddr )
buf buf' count finalize-buf buf buf' count finalize-buf
wsaRecvFrom count wsaRecvFrom
[ port>> addr>> empty-sockaddr dup ] [ port>> addr>> empty-sockaddr dup ]
[ lpFrom>> ] [ lpFrom>> ]
[ lpFromLen>> int deref ] [ lpFromLen>> int deref ]