diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1997-09-02 12:55:01 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1997-09-02 12:55:01 +0000 |
| commit | 1517cea772058b0fcbe778d05b8b99c7e6f3b25f (patch) | |
| tree | a2d817fe623f81b7729ed3cd2e128cad91eca02b /otherlibs/unix/sockopt.c | |
| parent | d75918f7e459b507ac6b4b95f14df0a1eedd4937 (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/sockopt.c')
| -rw-r--r-- | otherlibs/unix/sockopt.c | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/otherlibs/unix/sockopt.c b/otherlibs/unix/sockopt.c index 01725a1ef..d358b2261 100644 --- a/otherlibs/unix/sockopt.c +++ b/otherlibs/unix/sockopt.c @@ -30,8 +30,7 @@ static int sockopt[] = { SO_DEBUG, SO_BROADCAST, SO_REUSEADDR, SO_KEEPALIVE, SO_DONTROUTE, SO_OOBINLINE }; -value unix_getsockopt(socket, option) - value socket, option; +value unix_getsockopt(value socket, value option) { int optval, optsize; optsize = sizeof(optval); @@ -41,8 +40,7 @@ value unix_getsockopt(socket, option) return Val_int(optval); } -value unix_setsockopt(socket, option, status) - value socket, option, status; +value unix_setsockopt(value socket, value option, value status) { int optval = Int_val(status); if (setsockopt(Int_val(socket), SOL_SOCKET, sockopt[Int_val(option)], @@ -53,7 +51,10 @@ value unix_setsockopt(socket, option, status) #else -value unix_getsockopt() { invalid_argument("getsockopt not implemented"); } -value unix_setsockopt() { invalid_argument("setsockopt not implemented"); } +value unix_getsockopt(value socket, value option) +{ invalid_argument("getsockopt not implemented"); } + +value unix_setsockopt(value socket, value option, value status) +{ invalid_argument("setsockopt not implemented"); } #endif |