diff --git a/sys/vane/behn.hoon b/sys/vane/behn.hoon index 6361651db4..16db375f67 100644 --- a/sys/vane/behn.hoon +++ b/sys/vane/behn.hoon @@ -14,8 +14,7 @@ == :: +* broq [a b] :: brodal skew qeu (list (sqeu a b)) :: -+$ move {p/duct q/(wind note gift:able)} :: local move -+$ note ~ :: out request $-> ++$ move {p/duct q/(wind note:able gift:able)} :: local move +$ sign ~ :: in result $<- +$ clok (broq @da duct) :: stored timers +$ coke $~ [%0 ~ ~ ~] :: all state @@ -163,6 +162,9 @@ ((hard task:able) p.wrapped-task) |- ^- [(list move) _..^^$] :: + ?: ?=(%crud -.req) + [[[hen %slip %d %flog req] ~] ..^^$] + :: ?: ?=(%born -.req) =. gad hen ?~ p.tym diff --git a/sys/zuse.hoon b/sys/zuse.hoon index ee15ffb90e..96e85eea45 100644 --- a/sys/zuse.hoon +++ b/sys/zuse.hoon @@ -700,6 +700,10 @@ :: :::: ++ able ^? |% + ++ note :: out request $-> + $% $: $d :: to %dill + $% {$flog p/flog:dill} :: + == == == :: ++ gift :: out result <-$ $% {$doze p/(unit @da)} :: next alarm {$mass p/mass} :: memory usage @@ -707,6 +711,7 @@ == :: ++ task :: in request ->$ $% {$born ~} :: new unix process + {$crud p/@tas q/(list tank)} :: error with trace {$rest p/@da} :: cancel alarm {$wait p/@da} :: set alarm {$wake ~} :: timer activate