handles %crud in %behn

This commit is contained in:
Joe Bryan 2018-11-30 15:52:32 -05:00
parent 5da58f862c
commit faaa9cecee
2 changed files with 9 additions and 2 deletions

View File

@ -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

View File

@ -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