ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-12 15:01:38 +03:00
Code Issues Packages Projects Releases Wiki Activity

Change %ames namespace.

Browse Source
This commit is contained in:
C. Guy Yarvin 2014-05-30 21:58:37 -07:00
parent 1c20ba00f4
commit afa57ae065
2 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
arvo/ames.hoon
View File

@ -1466,21 +1466,22 @@
..^$(fox ~(boot am [now (furt q.new)]))
::
++ scry
|= [fur=(unit (set monk)) ren=@tas his=ship syd=desk lot=coin tyl=path]
|= [fur=(unit (set monk)) ren=@tas who=ship syd=desk lot=coin tyl=path]
^- (unit (unit))
?. ?=([~ [[& @] ~ ~]] fur) ~ :: XX lame
=+ our=`ship`p.n.u.fur
?~ tyl [~ ~]
=+ hun=(slaw %p i.tyl)
?~ hun [~ ~]
=- ?~ old ~
[~ ~ u.old]
^= old
?. =(0 ren) ~
?+ lot ~
[%$ %ud @]
(perm our his q.p.lot [syd tyl])
(perm who u.hun q.p.lot [syd t.tyl])
::
[%$ %da @]
?. =(now q.p.lot) ~
(temp our his [syd tyl])
(temp who u.hun [syd t.tyl])
==
::
++ stay `vase`!>(fox)
@ -1675,6 +1676,7 @@
::
++ temp
|= [our=ship his=ship tyl=path]
~& [%temp our his tyl]
^- (unit)
?: ?=([?(%show %tell) *] tyl)
?^ t.tyl ~

2
arvo/zuse.hoon
View File

@ -2656,7 +2656,7 @@
++ scry :: inspect
|= $: fur=(unit (set monk)) :: observers
ren=@tas :: submode
his=ship :: target
who=ship :: target
syd=@tas :: project
lot=coin :: version
tyl=path :: location