Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-06 20:56:38 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Updating open-net-io to check for filenos instead of integers.

Browse source
This commit is contained in:
Alex Shinn 2012-10-14 20:46:10 +09:00
parent 3d161d4d2f
commit eb88a24049
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/chibi/net.scm
View file

@ -30,7 +30,7 @@
(let ((sock (socket (address-info-family addr)
(address-info-socket-type addr)
(address-info-protocol addr))))
(if (negative? sock)
(if (not (fileno? sock))
(lp (address-info-next addr))
(cond
((negative?