diff --git a/basis/io/sockets/windows/nt/nt.factor b/basis/io/sockets/windows/nt/nt.factor index 0dd85954ac..8eb2df5b46 100644 --- a/basis/io/sockets/windows/nt/nt.factor +++ b/basis/io/sockets/windows/nt/nt.factor @@ -55,8 +55,8 @@ TUPLE: ConnectEx-args port [ lpOverlapped>> ] [ ptr>> ] } cleave - "int" - { "SOCKET" "sockaddr_in*" "int" "PVOID" "DWORD" "LPDWORD" "void*" } + int + { SOCKET void* int PVOID DWORD LPDWORD void* } "stdcall" alien-indirect drop winsock-error-string [ throw ] when* ; inline