diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1996-07-25 13:18:23 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1996-07-25 13:18:23 +0000 |
| commit | 1bf083e149b77415e677ee67cd39ef7c53152c46 (patch) | |
| tree | 1e48a70ea68b1fff0579a07befe9d54c1e631101 /otherlibs/unix/close.c | |
| parent | 8d0091cd8de16c1e3bd2711fac0feef705b6b8c1 (diff) | |
itimer, unix: on reprend les temps de type float et on implemente specialement
pour le code natif.
close, unix: suppression de closeall.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@941 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/unix/close.c')
| -rw-r--r-- | otherlibs/unix/close.c | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/otherlibs/unix/close.c b/otherlibs/unix/close.c index 355b27d23..41dfca5e9 100644 --- a/otherlibs/unix/close.c +++ b/otherlibs/unix/close.c @@ -20,12 +20,3 @@ value unix_close(fd) /* ML */ if (close(Int_val(fd)) == -1) uerror("close", Nothing); return Val_unit; } - -value unix_closeall(last_fd) /* ML */ - value last_fd; -{ - int fd; - for (fd = 3; fd <= Int_val(last_fd); fd++) close(fd); - return Val_unit; -} - |