mirror of
https://github.com/urbit/shrub.git
synced 2024-12-12 10:29:01 +03:00
Remove uses of old mold.
This commit is contained in:
parent
3c42c47fda
commit
e9b898e330
@ -9173,7 +9173,7 @@
|
||||
!:
|
||||
|%
|
||||
++ 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
|
||||
++ beak ,[p=ship q=desk r=case] :: garnish with beak
|
||||
++ bone ,@ud :: opaque duct
|
||||
@ -9597,8 +9597,8 @@
|
||||
?- -.r.gum
|
||||
%toss
|
||||
~? &(!lac !=(%gold p.gum))
|
||||
[%toss p.gum (,@tas +>-.r.r.gum) q.gum]
|
||||
[q.r.gum ~ [[p.gum p.r.gum] q.gum] r.r.gum]
|
||||
[%toss p.gum (,@tas +>-.q.q.r.gum) q.gum]
|
||||
[p.q.r.gum ~ [[p.gum p.r.gum] q.gum] q.q.r.gum]
|
||||
::
|
||||
%give
|
||||
?> ?=(^ q.gum)
|
||||
@ -9608,8 +9608,8 @@
|
||||
[i.i.q.gum [~ t.i.q.gum] t.q.gum p.r.gum]
|
||||
::
|
||||
%slip
|
||||
~? !lac [%slip p.gum (,@tas +>-.q.r.gum) q.gum]
|
||||
[p.r.gum ~ q.gum q.r.gum]
|
||||
~? !lac [%slip p.gum (,@tas +>-.q.p.r.gum) q.gum]
|
||||
[p.p.r.gum ~ q.gum q.p.r.gum]
|
||||
::
|
||||
%sick
|
||||
?> ?=(^ q.gum)
|
||||
|
Loading…
Reference in New Issue
Block a user