ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2025-01-07 07:30:23 +03:00
Code Issues Packages Projects Releases Wiki Activity

slum in arvo scry

Browse Source
This commit is contained in:
Ted Blackman 2019-01-17 15:31:41 -08:00
parent 62f20d8139
commit 8df76d273e
1 changed files with 4 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
sys/arvo.hoon
View File

@ -191,10 +191,7 @@
(~(slym wa *worm) vase.vane *vane-sample) (~(slym wa *worm) vase.vane *vane-sample)
:: cache the access of the %scry arm :: cache the access of the %scry arm
:: ::
=^ fun worm.vane (~(slap wa worm.vane) rig [%limb %scry]) +:(~(slap wa worm.vane) rig [%limb %scry])
:: cache the call to +mint that the +slym in +scry will do
::
+:(~(mint wa worm.vane) p.fun [%limb %$])
== ==
:: ::
++ wink :: deploy ++ wink :: deploy
@ -356,11 +353,9 @@
== ==
^- (unit (unit (cask))) ^- (unit (unit (cask)))
=+ fun=-:(~(slap wa worm.vane) rig [%limb %scry]) =+ fun=-:(~(slap wa worm.vane) rig [%limb %scry])
=+ pro=-:(~(slym wa worm.vane) fun old) ::
?~ q.pro ~ %- (unit (unit (cask)))
?~ +.q.pro [~ ~] (slum q.fun old)
=/ dat +>.q.pro
[~ ~ (mark -.dat) +.dat]
:: ::
++ soar :: scrub vane ++ soar :: scrub vane
|= sev/vase |= sev/vase