windows.winsock: fix getservbyport and servent struct.

diff --git a/basis/windows/winsock/winsock.factor b/basis/windows/winsock/winsock.factor
index 5049d13de4f20f3a408717ede136e57b61a1ca36..ed4738430915fd2df9310ed95960e0434c4b1b56 100644 (file)
--- a/basis/windows/winsock/winsock.factor
+++ b/basis/windows/winsock/winsock.factor
@@ -148,6 +148,8 @@ STRUCT: timeval
 
 STRUCT: servent
     { name c-string }
+    { aliases void* }
+    { port int }
     { proto c-string } ;
 
 GENERIC: sockaddr>ip ( sockaddr -- string )
@@ -192,7 +194,7 @@ FUNCTION: int getpeername ( SOCKET s, sockaddr-in* address, int* addrlen ) ;
 FUNCTION: protoent* getprotobyname ( c-string name ) ;
 
 FUNCTION: servent* getservbyname ( c-string name, c-string prot ) ;
-FUNCTION: servent* getservbyport ( c-string name, c-string prot ) ;
+FUNCTION: servent* getservbyport ( int port, c-string prot ) ;
 
 TYPEDEF: uint SERVICETYPE
 TYPEDEF: OVERLAPPED WSAOVERLAPPED