: malloc-int ( n -- alien )\r
int <ref> malloc-byte-array ; inline\r
\r
-M: winnt WSASocket-flags ( -- DWORD )\r
+M: windows WSASocket-flags ( -- DWORD )\r
WSA_FLAG_OVERLAPPED ;\r
\r
: get-ConnectEx-ptr ( socket -- void* )\r
tri memcpy\r
] bi ; inline\r
\r
-M: winnt (receive) ( datagram -- packet addrspec )\r
+M: windows (receive) ( datagram -- packet addrspec )\r
[\r
<WSARecvFrom-args>\r
[ call-WSARecvFrom ]\r
[ lpCompletionRoutine>> ]\r
} cleave WSASendTo socket-error* ; inline\r
\r
-M: winnt (send) ( packet addrspec datagram -- )\r
+M: windows (send) ( packet addrspec datagram -- )\r
[\r
<WSASendTo-args>\r
[ call-WSASendTo ]\r