mirror of
https://github.com/urbit/shrub.git
synced 2024-12-15 04:22:48 +03:00
24 lines
533 B
Plaintext
24 lines
533 B
Plaintext
::
|
|
:::: /hook/door/dill-blit/mar
|
|
::
|
|
/? 314
|
|
/- *sole
|
|
|_ dib=dill-blit
|
|
::
|
|
++ grab :: convert from
|
|
|%
|
|
++ noun dill-blit :: clam from %noun
|
|
--
|
|
++ grow
|
|
|%
|
|
++ json
|
|
^- ^json
|
|
?+ -.dib ~|(unsupported-blit/-.dib !!)
|
|
%mor [%a (turn p.dib |=(a=dill-blit json(dib a)))]
|
|
%hop (joba %hop (jone p.dib))
|
|
?(%pro %out) (joba -.dib (jape (tufa p.dib)))
|
|
?(%bel %clr) (joba %act %s -.dib)
|
|
==
|
|
--
|
|
--
|