mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-15 18:12:47 +03:00
clay: fix %sole-effect->%json conversion
This commit is contained in:
parent
58d3820e41
commit
3ad411646b
@ -1,3 +1,3 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:880523cb6208ad651d2fcef792c2b43e9dbf2d8721f9e3cafdf81be120e78c33
|
||||
size 13150614
|
||||
oid sha256:35f37d5c98a4f7b81e633179d27d458ed5b09a106d45ef4581f4e982923bb02b
|
||||
size 13198731
|
||||
|
@ -2883,11 +2883,16 @@
|
||||
=^ top stack.nub pop-stack
|
||||
=. casts.cache.nub (~(put by casts.cache.nub) [a b] [tube.res top])
|
||||
[tube.res nub]
|
||||
:: try +grow
|
||||
:: try +grow; is there a +grow core with a .b arm?
|
||||
::
|
||||
=^ old=vase nub (build-fit %mar a)
|
||||
=/ row (mule |.((slap old (ream (cat 3 b ':grow')))))
|
||||
?: ?=(%& -.row)
|
||||
?: =/ ram (mule |.((slap old ^~((ream 'grow')))))
|
||||
?: ?=(%| -.ram) %.n
|
||||
=/ lab (mule |.((slab b p.p.ram)))
|
||||
?: ?=(%| -.lab) %.n
|
||||
p.lab
|
||||
:: +grow core has .b arm; use that
|
||||
::
|
||||
:_ nub
|
||||
^- tube
|
||||
|= sam=vase
|
||||
|
Loading…
Reference in New Issue
Block a user