Mac OS X monitors load

extra/core-foundation/fsevents/fsevents.factor

@@ -1,8 +1,8 @@
 ! Copyright (C) 2008 Slava Pestov
 ! See http://factorcode.org/license.txt for BSD license.
 USING: alien alien.c-types alien.syntax kernel math sequences
-namespaces assocs init continuations ;
-IN: core-foundation
+namespaces assocs init continuations core-foundation ;
+IN: core-foundation.fsevents
 
 ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !
 ! FSEventStream API, Leopard only !

extra/io/monitors/monitors.factor

@@ -1,7 +1,7 @@
 ! Copyright (C) 2008 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: io.backend kernel continuations namespaces sequences
-assocs hashtables sorting arrays ;
+assocs hashtables sorting arrays threads ;
 IN: io.monitors
 
 <PRIVATE
@@ -36,7 +36,7 @@ TUPLE: simple-monitor handle callback ;
 
 : <simple-monitor> ( handle -- simple-monitor )
     f (monitor) {
-        set-simple-monitor-wd
+        set-simple-monitor-handle
         set-delegate
     } simple-monitor construct ;
 
@@ -44,8 +44,8 @@ TUPLE: simple-monitor handle callback ;
     >r <simple-monitor> r> construct-delegate ; inline
 
 : notify-callback ( simple-monitor -- )
-    dup linux-monitor-callback
-    f rot set-linux-monitor-callback
+    dup simple-monitor-callback
+    f rot set-simple-monitor-callback
     [ schedule-thread ] when* ;
 
 M: simple-monitor fill-queue ( monitor -- )

extra/io/unix/macosx/macosx.factor

@@ -1,6 +1,7 @@
 IN: io.unix.macosx
 USING: io.unix.bsd io.backend io.monitors io.monitors.private
-continuations kernel core-foundation.fsevents ;
+continuations kernel core-foundation.fsevents sequences
+namespaces arrays ;
 
 TUPLE: macosx-io ;
 

extra/io/unix/unix.factor

@@ -1,6 +1,6 @@
 USING: io.unix.backend io.unix.files io.unix.sockets io.timeouts
 io.unix.launcher io.unix.mmap io.backend combinators namespaces
-system vocabs.loader ;
+system vocabs.loader sequences ;
 
 "io.unix." os append require