mirror of
https://github.com/urbit/shrub.git
synced 2024-12-22 10:21:31 +03:00
34 lines
467 B
Plaintext
34 lines
467 B
Plaintext
|
/- hall, tiebout
|
||
|
=, format
|
||
|
::
|
||
|
|_ act=action:tiebout
|
||
|
::
|
||
|
++ grow
|
||
|
|%
|
||
|
++ tank >act<
|
||
|
--
|
||
|
::
|
||
|
++ grab
|
||
|
|%
|
||
|
++ noun action:tiebout
|
||
|
++ json
|
||
|
|= jon=^json
|
||
|
^- action:tiebout
|
||
|
=< (action jon)
|
||
|
|%
|
||
|
++ action
|
||
|
%- of:dejs
|
||
|
:~ token+so:dejs
|
||
|
add-circle+sa
|
||
|
del-circle+sa
|
||
|
==
|
||
|
++ sa :: string as ta
|
||
|
|= jon=^json
|
||
|
?> ?=([%s *] jon)
|
||
|
(scot %tas p.jon)
|
||
|
--
|
||
|
--
|
||
|
::
|
||
|
--
|
||
|
|