Rename WAIT-PORTS to SELECT-PORTS.

RELEASE

@@ -189,7 +189,7 @@ We manage the project using SourceForge:
 
 ** API changes
    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.
    New interface to the uname function.
    New direct interface to the directory stream operations

doc/scsh-manual/syscalls.tex

@@ -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
       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
       \texttt{select}/\texttt{select!}: it is much simpler to use, and
       also has a slightly more efficient implementation.}
 \end{desc}
 
-\defun {wait-ports}{timeout port \ldots}{ready-ports}
+\defun {select-ports}{timeout port \ldots}{ready-ports}
 \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
   that it either has data sitting its buffer or that the underlying
   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
   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
   before any ports became ready.
 \end{desc}

scsh/newports.scm

@@ -950,7 +950,7 @@
 		 (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))
 	(write-list (filter output-port? ports)))
 

scsh/scsh-interfaces.scm

@@ -221,7 +221,7 @@
 			      read-string!/partial
 
 			      select select!
-			      wait-ports
+			      select-ports
 
 			      (write-string (proc (:string &opt :value :exact-integer :exact-integer) :unspecific))
 			      write-string/partial)))