diff --git a/basis/io/unix/multiplexers/run-loop/run-loop.factor b/basis/io/unix/multiplexers/run-loop/run-loop.factor index 593fe93ac4..7b80e461dc 100644 --- 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