io.backend.unix: remove dead code from bsd backend, fix select code
parent
f0a9741a96
commit
c447ca5427
|
@ -7,7 +7,3 @@ IN: io.backend.unix.bsd
|
|||
|
||||
M: bsd init-io ( -- )
|
||||
<kqueue-mx> mx set-global ;
|
||||
|
||||
! M: bsd (monitor) ( path recursive? mailbox -- )
|
||||
! swap [ "Recursive kqueue monitors not supported" throw ] when
|
||||
! <vnode-monitor> ;
|
||||
|
|
|
@ -51,7 +51,7 @@ TUPLE: select-mx < mx read-fdset write-fdset ;
|
|||
|
||||
M:: select-mx wait-for-events ( nanos mx -- )
|
||||
mx
|
||||
[ init-fdsets nanos 1000 /i dup [ make-timeval ] when select multiplexer-error drop ]
|
||||
[ init-fdsets nanos dup [ 1000 /i make-timeval ] when select multiplexer-error drop ]
|
||||
[ [ read-fdset/tasks ] keep [ input-available ] check-fdset ]
|
||||
[ [ write-fdset/tasks ] keep [ output-available ] check-fdset ]
|
||||
tri ;
|
||||
|
|
Loading…
Reference in New Issue