1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/win32unix/connect.c b/otherlibs/win32unix/connect.c
index 650d32b77..405eadabd 100644
--- a/otherlibs/win32unix/connect.c
+++ b/otherlibs/win32unix/connect.c
@@ -18,12 +18,12 @@
 value unix_connect(socket, address)   /* ML */
      value socket, address;
 {
+  SOCKET s = (SOCKET) Handle_val(socket);
   int retcode;
 
   get_sockaddr(address);
   enter_blocking_section();
-  retcode = connect((SOCKET)_get_osfhandle(Int_val(socket)), 
-                    &sock_addr.s_gen, sock_addr_len);
+  retcode = connect(s, &sock_addr.s_gen, sock_addr_len);
   leave_blocking_section();
   if (retcode == -1) {
     _dosmaperr(WSAGetLastError());