summaryrefslogtreecommitdiffstats
path: root/otherlibs/unix/select.c
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>1997-09-02 12:55:01 +0000
committerXavier Leroy <xavier.leroy@inria.fr>1997-09-02 12:55:01 +0000
commit1517cea772058b0fcbe778d05b8b99c7e6f3b25f (patch)
treea2d817fe623f81b7729ed3cd2e128cad91eca02b /otherlibs/unix/select.c
parentd75918f7e459b507ac6b4b95f14df0a1eedd4937 (diff)
Sources C convertis en ANSI C
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1696 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/unix/select.c')
-rw-r--r--otherlibs/unix/select.c13
1 files changed, 5 insertions, 8 deletions
diff --git a/otherlibs/unix/select.c b/otherlibs/unix/select.c
index 3452ab0df..c24756069 100644
--- a/otherlibs/unix/select.c
+++ b/otherlibs/unix/select.c
@@ -36,9 +36,7 @@ typedef int file_descr_set;
#define FD_ZERO(fds) (*(fds) = 0)
#endif
-static void fdlist_to_fdset(fdlist, fdset)
- value fdlist;
- file_descr_set * fdset;
+static void fdlist_to_fdset(value fdlist, file_descr_set *fdset)
{
value l;
FD_ZERO(fdset);
@@ -47,8 +45,7 @@ static void fdlist_to_fdset(fdlist, fdset)
}
}
-static value fdset_to_fdlist(fdset)
- file_descr_set * fdset;
+static value fdset_to_fdlist(file_descr_set *fdset)
{
int i;
value res = Val_int(0);
@@ -66,8 +63,7 @@ static value fdset_to_fdlist(fdset)
return res;
}
-value unix_select(readfds, writefds, exceptfds, timeout) /* ML */
- value readfds, writefds, exceptfds, timeout;
+value unix_select(value readfds, value writefds, value exceptfds, value timeout) /* ML */
{
file_descr_set read, write, except;
double tm;
@@ -106,6 +102,7 @@ value unix_select(readfds, writefds, exceptfds, timeout) /* ML */
#else
-value unix_select() { invalid_argument("select not implemented"); }
+value unix_select(value readfds, value writefds, value exceptfds, value timeout)
+{ invalid_argument("select not implemented"); }
#endif