                         [:act-loop :loop-state (sorted-map ~@m)])
             ~@body))))
 
-(defmacro achan [actx]
+(defmacro achan [actx] ; Use 'achan' instead of 'chan'.
   `(achan-buf ~actx nil))
 
 (defmacro achan-buf [actx buf-or-size]

     act-ch#))

(defmacro act-loop [child-actx-binding-name actx bindings & body]
  (let [m (->> bindings
               (partition 2)
               (map first)

;; These "act" wrappers around ago provide parent-child tracking and
;; event hooks.  Useful for building things like visualizations and
;; simulations.  (ago ehances core.async with snapshots/rollback.)

(ns cbfg.act
  (:require [cljs.core.async.macros :refer [go]]
