urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-13 06:25:09 +03:00
Code Issues Packages Projects Releases Wiki Activity

Remove uses of old mold.

Browse Source
This commit is contained in:
C. Guy Yarvin 2014-06-21 22:20:42 -07:00
parent 3c42c47fda
commit e9b898e330
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
arvo/hoon.hoon
View File

@ -9173,7 +9173,7 @@
!: !:
|% |%
++ arch ,[p=@uvI q=(unit ,@uvI) r=(map ,@ta ,~)] :: fundamental node ++ arch ,[p=@uvI q=(unit ,@uvI) r=(map ,@ta ,~)] :: fundamental node
++ arvo (mold mill mill) :: arvo card ++ arvo (molt ,[p=term q=mill] mill) :: arvo card
++ beam ,[[p=ship q=desk r=case] s=path] :: global name ++ beam ,[[p=ship q=desk r=case] s=path] :: global name
++ beak ,[p=ship q=desk r=case] :: garnish with beak ++ beak ,[p=ship q=desk r=case] :: garnish with beak
++ bone ,@ud :: opaque duct ++ bone ,@ud :: opaque duct
@ -9597,8 +9597,8 @@
?- -.r.gum ?- -.r.gum
%toss %toss
~? &(!lac !=(%gold p.gum)) ~? &(!lac !=(%gold p.gum))
[%toss p.gum (,@tas +>-.r.r.gum) q.gum] [%toss p.gum (,@tas +>-.q.q.r.gum) q.gum]
[q.r.gum ~ [[p.gum p.r.gum] q.gum] r.r.gum] [p.q.r.gum ~ [[p.gum p.r.gum] q.gum] q.q.r.gum]
:: ::
%give %give
?> ?=(^ q.gum) ?> ?=(^ q.gum)
@ -9608,8 +9608,8 @@
[i.i.q.gum [~ t.i.q.gum] t.q.gum p.r.gum] [i.i.q.gum [~ t.i.q.gum] t.q.gum p.r.gum]
:: ::
%slip %slip
~? !lac [%slip p.gum (,@tas +>-.q.r.gum) q.gum] ~? !lac [%slip p.gum (,@tas +>-.q.p.r.gum) q.gum]
[p.r.gum ~ q.gum q.r.gum] [p.p.r.gum ~ q.gum q.p.r.gum]
:: ::
%sick %sick
?> ?=(^ q.gum) ?> ?=(^ q.gum)