shrub/pkg/arvo/mar/dill/blit.hoon
2020-11-26 17:38:00 +01:00

28 lines
599 B
Plaintext

::
:::: /hoon/blit/dill/mar
::
/? 310
/- sole
=, sole
=, enjs:format
|_ dib=dill-blit:dill
++ grad %noun
::
++ grab :: convert from
|%
++ noun dill-blit:dill :: clam from %noun
--
++ grow
|%
++ noun dib
++ json
^- ^json
?+ -.dib ~|(unsupported-blit+-.dib !!)
%mor [%a (turn p.dib |=(a=dill-blit:dill json(dib a)))]
%hop (frond %hop (numb p.dib))
?(%pro %out) (frond -.dib (tape (tufa p.dib)))
?(%bel %clr) (frond %act %s -.dib)
==
--
--