behn: cleans up comments
%wake (wake(next-wake.state ~) error)
==
::
- :: +take-drip: XX
+ :: +take-drip: the future is now, %give the deferred move
::
++ take-drip
|= [num=@ud error=(unit tang)]
::
+| %tasks
::
- :: +drip: XX
+ :: +drip: enqueue a future gift (as a vase), %pass ourselves a %wait
::
++ drip
|= vax=vase
count.drips.state +(count.drips.state)
==
::
- :: +wake: unix says wake up; process the elapsed timer and set :next-wake
+ :: +wake: unix says wake up; process the elapsed timer (or forward error)
::
++ wake
|= error=(unit tang)
:: pop the first timer and notify client vane,
:: forwarding error if present
::
+ :: XX %wake errors should be signaled out-of-band
+ :: [duct.timer %hurl goof %give %wake ~]
+ ::
(emit(timers.state later-timers) [duct.timer %give %wake error])
::
+| %implementation
