     { "char*" "canonname" }
     { "sockaddr*" "addr" }
     { "addrinfo*" "next" } ;
+
+C-STRUCT: timeval
+    { "long" "sec" }
+    { "long" "usec" } ;
 
 : hostent-addr ( hostent -- addr ) hostent-addr-list *void* ; ! *uint ;
 


: init-winsock ( -- )
    HEX: 0202 <wsadata> WSAStartup winsock-return-check ;


! Copyright (C) 2006 Mackenzie Straight, Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien alien.c-types alien.strings alien.syntax arrays
byte-arrays kernel math sequences windows.types windows.kernel32
windows.errors windows math.bitwise alias ;
IN: windows.winsock

USE: libc
