master: unix-fast-select: allow select on FD_SETSIZE - 1

stassats via Sbcl-commits <[email protected]>
Newsgroups gmane.lisp.steel-bank.cvs
Message-ID <[email protected]>
The branch "master" has been updated in SBCL:
       via  db9ae74c6755f8aca827ebc61ae03ba6c364b5e5 (commit)
      from  b2dc86b47a1023856188d24c2c6e7cfe0eb12fac (commit)

- Log -----------------------------------------------------------------
commit db9ae74c6755f8aca827ebc61ae03ba6c364b5e5
Author: Stas Boukarev <[email protected]>
Date:   Wed Apr 15 17:51:54 2026 +0300

    unix-fast-select: allow select on FD_SETSIZE - 1
---
 src/code/unix.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/code/unix.lisp b/src/code/unix.lisp
index 06fc530b0..10f9946ef 100644
--- a/src/code/unix.lisp
+++ b/src/code/unix.lisp
@@ -674,11 +674,11 @@ avoiding atexit(3) hooks, etc. Otherwise exit(2) is called."
 ;;;; sys/select.h
 
 (defmacro with-fd-setsize ((n) &body body)
-  `(let ((,n (if (< 0 ,n fd-setsize)
+  `(let ((,n (if (<= -1 ,n fd-setsize)
                  ,n
                  (error "Cannot select(2) on ~D: above FD_SETSIZE limit."
                         (1- ,n)))))
-     (declare (type (integer 0 #.fd-setsize) ,n))
+     (declare (type (integer 0 ,fd-setsize) ,n))
      ,@body))
 
 ;;; Perform the UNIX select(2) system call.

-----------------------------------------------------------------------


hooks/post-receive
-- 
SBCL
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.