diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1999-02-24 16:35:33 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1999-02-24 16:35:33 +0000 |
| commit | be894f1d3a01f3679dfd98d48e93aedeb76d7d48 (patch) | |
| tree | b6faf6d1f113faa76e8135ed2f990accd98a5ea3 /otherlibs/win32unix/accept.c | |
| parent | 138526c31b34e1007a4ebba88f31996aba6f1ed9 (diff) | |
Retour en arriere sur les sockets asynchrones (ne marche pas avec tk)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2307 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/win32unix/accept.c')
| -rw-r--r-- | otherlibs/win32unix/accept.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/otherlibs/win32unix/accept.c b/otherlibs/win32unix/accept.c index 90a0860df..1c45ade0c 100644 --- a/otherlibs/win32unix/accept.c +++ b/otherlibs/win32unix/accept.c @@ -17,8 +17,8 @@ #include "unixsupport.h" #include "socketaddr.h" -value unix_accept(sock, synchronous) /* ML */ - value sock, synchronous; +value unix_accept(sock) /* ML */ + value sock; { SOCKET sconn = (SOCKET) Handle_val(sock); SOCKET snew; @@ -29,8 +29,8 @@ value unix_accept(sock, synchronous) /* ML */ retcode = getsockopt(INVALID_SOCKET, SOL_SOCKET, SO_OPENTYPE, (char *) &oldvalue, &oldvaluelen); if (retcode == 0) { - /* Set sockets to synchronous or asnychronous mode, as requested */ - newvalue = Bool_val(synchronous) ? SO_SYNCHRONOUS_NONALERT : 0; + /* Set sockets to synchronous mode */ + newvalue = SO_SYNCHRONOUS_NONALERT; setsockopt(INVALID_SOCKET, SOL_SOCKET, SO_OPENTYPE, (char *) &newvalue, sizeof(newvalue)); } |