urbit/pkg/arvo/mar/dill/blit.hoon

::
::::  /hoon/blit/dill/mar
  ::
/?    310
/-    sole
=,  sole
=,  enjs:format
|_  dib/dill-blit:dill
::
++  grab                                                   ::  convert from
  |%
  ++  noun  dill-blit:dill                                 ::  clam from %noun
  --
++  grow
  |%
  ++  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)
    ==
  --
--
Matrix frontend v1 2015-04-09 04:35:17 +03:00			`::`
fix hoon location header information 2016-02-05 06:05:37 +03:00			`:::: /hoon/blit/dill/mar`
Matrix frontend v1 2015-04-09 04:35:17 +03:00			`::`
verified mark code 2016-02-18 02:00:12 +03:00			`/? 310`
Sur disqualification moved to userspace sed -i'' -e '/^\|/{x;/./{p;s/.//;};x;};/ \\/-.\\/{h;s/ //g;s/,[a-z]//g;s/^[^a-z]/[/;s/ ::.$//;s/$/ .]/;s// /g;x;s/\\//g;}' urb/zod/**.{hoon,hook} Followed by manual fixes where e.g. the file didn't start with a core 2015-09-01 23:56:42 +03:00			`/- sole`
reformat =+ to =, in ford files 2016-11-17 04:37:39 +03:00			`=, sole`
Remove old-zuse (#867) * removes old-zuse 2018-10-27 02:19:18 +03:00			`=, enjs:format`
			`\|_ dib/dill-blit:dill`
Matrix frontend v1 2015-04-09 04:35:17 +03:00			`::`
Remove old-zuse (#867) * removes old-zuse 2018-10-27 02:19:18 +03:00			`++ grab :: convert from`
Matrix frontend v1 2015-04-09 04:35:17 +03:00			`\|%`
Remove old-zuse (#867) * removes old-zuse 2018-10-27 02:19:18 +03:00			`++ noun dill-blit:dill :: clam from %noun`
Matrix frontend v1 2015-04-09 04:35:17 +03:00			`--`
			`++ grow`
			`\|%`
			`++ json`
			`^- ^json`
Final conversion of # to +. 2015-12-21 00:16:39 +03:00			`?+ -.dib ~\|(unsupported-blit+-.dib !!)`
Remove old-zuse (#867) * removes old-zuse 2018-10-27 02:19:18 +03:00			`$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)`
Matrix frontend v1 2015-04-09 04:35:17 +03:00			`==`
			`--`
			`--`