Fix dispose method on run-loop-mx

diff --git a/basis/io/unix/multiplexers/run-loop/run-loop.factor b/basis/io/unix/multiplexers/run-loop/run-loop.factor
index 593fe93ac4ab427ae0e4df49ea74b9a2196a9edd..7b80e461dce40b506bc310134c688f90ea048cdc 100644 (file)
--- a/basis/io/unix/multiplexers/run-loop/run-loop.factor
+++ b/basis/io/unix/multiplexers/run-loop/run-loop.factor
@@ -40,8 +40,8 @@ SYMBOL: kqueue-run-loop-source
 M: run-loop-mx dispose
     [
         {
-            [ fd>> &dispose drop ]
-            [ source>> &dispose drop ]
+            [ fd>> &CFRelease drop ]
+            [ source>> &CFRelease drop ]
             [ remove-kqueue-from-run-loop ]
             [ kqueue-mx>> &dispose drop ]
         } cleave