steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix Linux I/O

db4
Slava Pestov 2008-01-24 21:10:17 -04:00
parent 681c595b04
commit b5a337bb2a
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/io/unix/launcher/launcher.factor
View File

@ -84,7 +84,7 @@ M: unix-io process-stream*
! On BSD and Mac OS X, we use kqueue() which scales better. ! On BSD and Mac OS X, we use kqueue() which scales better.
: wait-for-processes ( -- ? ) : wait-for-processes ( -- ? )
-1 0 <int> tuck WNOHANG waitpid -1 0 <int> tuck WNOHANG waitpid
dup zero? [ dup 0 <= [
2drop t 2drop t
] [ ] [
find-process dup [ find-process dup [

2
extra/unix/unix.factor
View File

@ -13,7 +13,7 @@ TYPEDEF: longlong quad_t
TYPEDEF: uint gid_t TYPEDEF: uint gid_t
TYPEDEF: uint in_addr_t TYPEDEF: uint in_addr_t
TYPEDEF: uint ino_t TYPEDEF: uint ino_t
TYPEDEF: uint pid_t TYPEDEF: int pid_t
TYPEDEF: uint socklen_t TYPEDEF: uint socklen_t
TYPEDEF: uint time_t TYPEDEF: uint time_t
TYPEDEF: uint uid_t TYPEDEF: uint uid_t