mirror of
https://github.com/urbit/shrub.git
synced 2024-11-29 06:45:42 +03:00
18 lines
395 B
Plaintext
18 lines
395 B
Plaintext
|
/+ default-agent
|
||
|
^- agent:gall
|
||
|
|_ =bowl:gall
|
||
|
+* this .
|
||
|
def ~(. (default-agent this %|) bowl)
|
||
|
step `step:agent:gall`[~ this]
|
||
|
++ on-init on-init:def
|
||
|
++ on-save on-save:def
|
||
|
++ on-load on-load:def
|
||
|
++ on-poke |=(* step)
|
||
|
++ on-watch on-watch:def
|
||
|
++ on-leave |=(* step)
|
||
|
++ on-peek |=(* ~)
|
||
|
++ on-agent |=(* step)
|
||
|
++ on-arvo |=(* step)
|
||
|
++ on-fail on-fail:def
|
||
|
--
|