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

2014-08-05 10:01:55 -07:00 · 2014-08-05 10:01:55 -07:00 · fec182d2d8
parent 68446b047b
commit fec182d2d8
1 changed files with 1 additions and 2 deletions
--- a/basis/io/backend/unix/multiplexers/run-loop/run-loop.factor
+++ b/basis/io/backend/unix/multiplexers/run-loop/run-loop.factor
@ -12,9 +12,8 @@ TUPLE: run-loop-mx kqueue-mx ;
 : file-descriptor-callback ( -- callback )
    void { CFFileDescriptorRef CFOptionFlags void* }
    cdecl [
-        2drop
+        3drop
        0 mx get-global kqueue-mx>> wait-for-events
-        enable-all-callbacks
        reset-run-loop
        yield
    ] alien-callback ;