2015-04-09 04:35:17 +03:00
|
|
|
::
|
2016-02-05 06:05:37 +03:00
|
|
|
:::: /hoon/blit/dill/mar
|
2015-04-09 04:35:17 +03:00
|
|
|
::
|
2016-02-18 02:00:12 +03:00
|
|
|
/? 310
|
2015-09-01 23:56:42 +03:00
|
|
|
/- sole
|
2017-02-14 03:02:25 +03:00
|
|
|
/+ old-zuse
|
2016-11-17 04:37:39 +03:00
|
|
|
=, sole
|
2017-02-14 03:02:25 +03:00
|
|
|
=, old-zuse
|
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-21 00:16:39 +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
|
|
|
==
|
|
|
|
--
|
|
|
|
--
|