urbit/main/bin/env.hoon

!:
::  /=main=/bin/env/hoon
::
=>  .(- [who=`@p`-< how=`path`->])
|=  [est=time eny=@uw]
|=  arg=(list)
^-  bowl
:_  ~
=+  ^=  voy  ^-  (list tape)
    :~  "who: {<who>}"
        "how: {<how>}"
        "est: {<est>}"
        "eny: {<eny>}"
    ==
::
=+  ^=  gar
    =+  nix=1
    |-  ^-  (list tape)
    ?~  arg  ~
    :_  $(arg t.arg, nix +(nix))
    "arg: {(pave !>(nix))}: {(pave !>(i.arg))}"
::
(turn (weld voy gar) |=(a=tape [%la %leaf a]))
Cleaning up old code 2013-09-29 00:21:18 +04:00			`!:`
			`:: /=main=/bin/env/hoon`
			`::`
			=> .(- [who=`@p`-< how=`path`->])
			`\|= [est=time eny=@uw]`
			`\|= arg=(list)`
			`^- bowl`
			`:_ ~`
			`=+ ^= voy ^- (list tape)`
			`:~ "who: {<who>}"`
			`"how: {<how>}"`
			`"est: {<est>}"`
			`"eny: {<eny>}"`
			`==`
			`::`
Ye olde whitespace cleanup Run using find . -type f \| xargs sed -i '\s\+$' And not even glanced at. It's fine. Don't worry about it. 2013-12-09 01:23:03 +04:00			`=+ ^= gar`
Cleaning up old code 2013-09-29 00:21:18 +04:00			`=+ nix=1`
			`\|- ^- (list tape)`
			`?~ arg ~`
			`:_ $(arg t.arg, nix +(nix))`
			`"arg: {(pave !>(nix))}: {(pave !>(i.arg))}"`
			`::`
			`(turn (weld voy gar) \|=(a=tape [%la %leaf a]))`