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

io.backend.unix.multiplexers.run-loop: don't enable-all-callbacks twice.

db4
John Benediktsson 2014-08-05 10:01:55 -07:00
parent 68446b047b
commit fec182d2d8
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/io/backend/unix/multiplexers/run-loop/run-loop.factor
View File

@ -12,9 +12,8 @@ TUPLE: run-loop-mx kqueue-mx ;
: file-descriptor-callback ( -- callback ) : file-descriptor-callback ( -- callback )
void { CFFileDescriptorRef CFOptionFlags void* } void { CFFileDescriptorRef CFOptionFlags void* }
cdecl [ cdecl [
2drop 3drop
0 mx get-global kqueue-mx>> wait-for-events 0 mx get-global kqueue-mx>> wait-for-events
enable-all-callbacks
reset-run-loop reset-run-loop
yield yield
] alien-callback ; ] alien-callback ;