Rename WAIT-PORTS to SELECT-PORTS.
This commit is contained in:
parent
c80a5b628c
commit
b01518b4d9
2
RELEASE
2
RELEASE
|
@ -189,7 +189,7 @@ We manage the project using SourceForge:
|
||||||
|
|
||||||
** API changes
|
** API changes
|
||||||
select and select! are supported again. Note however, that we
|
select and select! are supported again. Note however, that we
|
||||||
recommend to use the new wait-ports procedure instead whenever
|
recommend to use the new select-ports procedure instead whenever
|
||||||
possible.
|
possible.
|
||||||
New interface to the uname function.
|
New interface to the uname function.
|
||||||
New direct interface to the directory stream operations
|
New direct interface to the directory stream operations
|
||||||
|
|
|
@ -837,15 +837,15 @@ Returns two ports, the read and write end-points of a {\Unix} pipe.
|
||||||
that send requests to multiple alternate servers and discard all
|
that send requests to multiple alternate servers and discard all
|
||||||
but one of them.
|
but one of them.
|
||||||
|
|
||||||
In any case, the \texttt{wait-ports} procedure described below
|
In any case, the \texttt{select-ports} procedure described below
|
||||||
is usually a preferable alternative to
|
is usually a preferable alternative to
|
||||||
\texttt{select}/\texttt{select!}: it is much simpler to use, and
|
\texttt{select}/\texttt{select!}: it is much simpler to use, and
|
||||||
also has a slightly more efficient implementation.}
|
also has a slightly more efficient implementation.}
|
||||||
\end{desc}
|
\end{desc}
|
||||||
|
|
||||||
\defun {wait-ports}{timeout port \ldots}{ready-ports}
|
\defun {select-ports}{timeout port \ldots}{ready-ports}
|
||||||
\begin{desc}
|
\begin{desc}
|
||||||
The \ex{wait-ports} call will block until at least one of the ports
|
The \ex{select-ports} call will block until at least one of the ports
|
||||||
passed to it is ready for operation. For an input port this means
|
passed to it is ready for operation. For an input port this means
|
||||||
that it either has data sitting its buffer or that the underlying
|
that it either has data sitting its buffer or that the underlying
|
||||||
file descriptor has data waiting. For an output port this means
|
file descriptor has data waiting. For an output port this means
|
||||||
|
@ -856,7 +856,7 @@ Returns two ports, the read and write end-points of a {\Unix} pipe.
|
||||||
after a given number of seconds. A value of \ex{\#f} means to wait
|
after a given number of seconds. A value of \ex{\#f} means to wait
|
||||||
indefinitely. A zero value can be used to poll the ports.
|
indefinitely. A zero value can be used to poll the ports.
|
||||||
|
|
||||||
\texttt{Wait-ports} returns a list of the ports ready for
|
\texttt{Select-ports} returns a list of the ports ready for
|
||||||
operation. Note that this list may be empty if the timeout expired
|
operation. Note that this list may be empty if the timeout expired
|
||||||
before any ports became ready.
|
before any ports became ready.
|
||||||
\end{desc}
|
\end{desc}
|
||||||
|
|
|
@ -950,7 +950,7 @@
|
||||||
(values n-read-ready n-write-ready 0)))))))))
|
(values n-read-ready n-write-ready 0)))))))))
|
||||||
|
|
||||||
|
|
||||||
(define (wait-ports timeout . ports)
|
(define (select-ports timeout . ports)
|
||||||
(let ((read-list (filter input-port? ports))
|
(let ((read-list (filter input-port? ports))
|
||||||
(write-list (filter output-port? ports)))
|
(write-list (filter output-port? ports)))
|
||||||
|
|
||||||
|
|
|
@ -221,7 +221,7 @@
|
||||||
read-string!/partial
|
read-string!/partial
|
||||||
|
|
||||||
select select!
|
select select!
|
||||||
wait-ports
|
select-ports
|
||||||
|
|
||||||
(write-string (proc (:string &opt :value :exact-integer :exact-integer) :unspecific))
|
(write-string (proc (:string &opt :value :exact-integer :exact-integer) :unspecific))
|
||||||
write-string/partial)))
|
write-string/partial)))
|
||||||
|
|
Loading…
Reference in New Issue