20 lines
581 B
Factor
20 lines
581 B
Factor
! Copyright (C) 2008 Slava Pestov.
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
USING: init io.backend io.backend.unix
|
|
io.backend.unix.multiplexers io.backend.unix.multiplexers.kqueue
|
|
io.backend.unix.multiplexers.run-loop namespaces system ;
|
|
USE: io.files.unix ! need this for deploy
|
|
IN: io.backend.unix.macosx
|
|
|
|
SINGLETON: macosx-kqueue
|
|
|
|
M: macosx-kqueue init-io ( -- )
|
|
<kqueue-mx> mx set-global ;
|
|
|
|
M: macosx init-io ( -- )
|
|
<run-loop-mx> mx set-global ;
|
|
|
|
macosx set-io-backend
|
|
|
|
[ start-signal-pipe-thread ] "io.backend.unix:signal-pipe-thread" add-startup-hook
|