//! Tap system: add-tap, remove-tap, tap>
//!
//! `tap>` enqueues a value (bounded queue, drops on overflow).
//! A background drain thread delivers values to all registered tap fns.
use ;
use ;
/// (add-tap f) — register a tap fn. Returns nil.
/// (remove-tap f) — unregister a tap fn. Returns nil.
/// (tap> val) — enqueue a value. Returns true if enqueued, false if dropped.