urbit/mar/dill/blit.hoon

25 lines
536 B
Plaintext
Raw Normal View History

2015-04-09 04:35:17 +03:00
::
2015-12-20 14:48:17 +03:00
:::: /hoon#dill-blit#mar
2015-04-09 04:35:17 +03:00
::
/? 314
/- sole
[sole .]
2015-12-20 23:50:45 +03:00
|_ dib/dill-blit
2015-04-09 04:35:17 +03:00
::
++ grab :: convert from
|%
++ noun dill-blit :: clam from %noun
--
++ grow
|%
++ json
^- ^json
2015-12-20 14:48:17 +03:00
?+ -.dib ~|(unsupported-blit#-.dib !!)
2015-12-20 23:50:45 +03:00
$mor [%a (turn p.dib |=(a/dill-blit json(dib a)))]
2015-12-10 12:17:19 +03:00
$hop (joba %hop (jone p.dib))
?($pro $out) (joba -.dib (jape (tufa p.dib)))
?($bel $clr) (joba %act %s -.dib)
2015-04-09 04:35:17 +03:00
==
--
--