shrub/pkg/arvo/gen/hood/mount.hoon

::  Kiln: Mount path to unix
::
::::  /hoon/mount/hood/gen
  ::
/?    310
::
::::
  ::
:-  %say
=>  |%
    +$  bath
      $@  desk
      (lest knot)
    --
|=  $:  [now=@da eny=@uvJ bec=beak]
        [=bath pot=$@(~ [v=@tas ~])]
        ~
    ==
=/  bem=beam
  ?@  bath  [bec(q bath) /]
  (need (de-beam `path`bath))
::
=/  =desk
  ?^  pot  v.pot
  ?^(s.bem (rear s.bem) q.bem)
::
[%kiln-mount (en-beam bem) desk]
added one-line info to all generators 2016-10-22 02:44:39 +03:00			`:: Kiln: Mount path to unix`
forgot to commit {,un}mount.hoon 2015-06-19 01:06:07 +03:00			`::`
fix mis-translated / to + 2016-02-11 03:41:28 +03:00			`:::: /hoon/mount/hood/gen`
forgot to commit {,un}mount.hoon 2015-06-19 01:06:07 +03:00			`::`
formal reponsibility taken gen/ 314->310 2016-02-17 04:40:32 +03:00			`/? 310`
forgot to commit {,un}mount.hoon 2015-06-19 01:06:07 +03:00			`::`
			`::::`
!: in ford files is redundant 2016-11-17 04:42:58 +03:00			`::`
rename generators to %say, %ask, %get 2015-09-12 03:24:51 +03:00			`:- %say`
\|mount: support simple @tas arg 2021-07-19 15:13:58 +03:00			`=> \|%`
			`+$ bath`
			`$@ desk`
			`(lest knot)`
			`--`
various: move away from {type} syntax In favor of [type] syntax. Turns a bunch of ++ into +$ along the way. 2020-11-26 17:09:31 +03:00			`\|= $: [now=@da eny=@uvJ bec=beak]`
\|mount: support simple @tas arg 2021-07-19 15:13:58 +03:00			`[=bath pot=$@(~ [v=@tas ~])]`
			`~`
forgot to commit {,un}mount.hoon 2015-06-19 01:06:07 +03:00			`==`
\|mount: support simple @tas arg 2021-07-19 15:13:58 +03:00			`=/ bem=beam`
			`?@ bath [bec(q bath) /]`
			(need (de-beam `path`bath))
			`::`
			`=/ =desk`
			`?^ pot v.pot`
			`?^(s.bem (rear s.bem) q.bem)`
			`::`
			`[%kiln-mount (en-beam bem) desk]`