1 ! Copyright (C) 2008 Slava Pestov.
2 ! See http://factorcode.org/license.txt for BSD license.
4 USING: namespaces system kernel accessors assocs continuations
5 unix io.backend io.unix.backend io.unix.select ;
8 <select-mx> mx set-global ;
9 ! <kqueue-mx> kqueue-mx set-global
10 ! kqueue-mx get-global <mx-port> <mx-task>
12 ! [ mx get-global reads>> set-at ]
13 ! [ mx get-global writes>> set-at ] 2bi ;
15 ! M: bsd (monitor) ( path recursive? mailbox -- )
16 ! swap [ "Recursive kqueue monitors not supported" throw ] when