urbit/mar/tang.hoon

::
::::  /hoon/core/tang/mar
  ::
/?  314
!:
|_  tan=(list tank)
::
++  grow
  |%
  ++  elem
    =-  ;pre:code:"{(trip (role (turn - crip)))}"       ::  XX
    ^-  wall  %-  zing  ^-  (list wall)
    (turn (flop tan) |=(a=tank (wash 0^160 a)))
  --
++  grab                                                ::  convert from
  |%
  ++  noun  (list ^tank)                                 ::  clam from %noun
  ++  tank  |=(a=^tank [a]~)
  --
--
first shell apps 2014-09-25 04:37:29 +04:00			`::`
put flops on all tang->text boundaries 2015-06-17 00:01:07 +03:00			`:::: /hoon/core/tang/mar`
first shell apps 2014-09-25 04:37:29 +04:00			`::`
			`/? 314`
Initial eyre paring down 2015-02-06 08:00:35 +03:00			`!:`
first shell apps 2014-09-25 04:37:29 +04:00			`\|_ tan=(list tank)`
			`::`
Initial eyre paring down 2015-02-06 08:00:35 +03:00			`++ grow`
			`\|%`
psal -> elem 2015-06-06 01:20:26 +03:00			`++ elem`
Initial eyre paring down 2015-02-06 08:00:35 +03:00			`=- ;pre:code:"{(trip (role (turn - crip)))}" :: XX`
			`^- wall %- zing ^- (list wall)`
put flops on all tang->text boundaries 2015-06-17 00:01:07 +03:00			`(turn (flop tan) \|=(a=tank (wash 0^160 a)))`
Initial eyre paring down 2015-02-06 08:00:35 +03:00			`--`
first shell apps 2014-09-25 04:37:29 +04:00			`++ grab :: convert from`
			`\|%`
minor tweaks 2015-07-06 22:00:01 +03:00			`++ noun (list ^tank) :: clam from %noun`
			`++ tank \|=(a=^tank [a]~)`
first shell apps 2014-09-25 04:37:29 +04:00			`--`
			`--`