diff --git a/src/net/cgrand/xforms.cljc b/src/net/cgrand/xforms.cljc
index 28deba9..e51123e 100644
--- a/src/net/cgrand/xforms.cljc
+++ b/src/net/cgrand/xforms.cljc
@@ -330,7 +330,7 @@
                        (vreset! barrier n)
                        (.clear dq)
                        acc)
-                     acc))
+                     (rf acc)))
             ([acc x]
               (let [b (vswap! barrier dec)]
                 (when (< b n) (.add dq (if (nil? x) dq x)))