updates %behn +note/+sign to reference other vanes with $>

This commit is contained in:
Joe Bryan 2019-05-25 01:32:51 -07:00
parent 313052ff09
commit b7bdc66bc8
2 changed files with 13 additions and 9 deletions

View File

@ -5,8 +5,19 @@
=, behn
|= pit=vase
=> |%
+$ move [p=duct q=(wind note:able gift:able)]
+$ sign [%b %wake error=(unit tang)]
+$ move [p=duct q=(wind note gift:able)]
+$ note :: out request $->
$~ [%b %wait *@da] ::
$% $: %b :: to self
$>(%wait task:able) :: set timer
== ::
$: %d :: to %dill
$>(%flog task:able:dill) :: log output
== == ::
+$ sign
$~ [%b %wake ~]
$% [%b $>(%wake gift:able)]
==
::
+$ behn-state
$: timers=(list timer)

View File

@ -384,13 +384,6 @@
:: ::::
++ able ^?
|%
++ note :: out request $->
$% $: %b :: to %behn
$% [%wait p=@da]
== ==
$: %d :: to %dill
$% [%flog =flog:dill]
== == ==
++ gift :: out result <-$
$% [%doze p=(unit @da)] :: next alarm
[%mass p=mass] :: memory usage