mirror of
https://github.com/urbit/shrub.git
synced 2024-11-27 18:34:48 +03:00
Merge pull request #6578 from urbit/master
Merge clay null tako fix from master back to develop
This commit is contained in:
commit
f0360e69a2
@ -4492,13 +4492,13 @@
|
|||||||
++ read-at-tako :: read-at-tako:ze
|
++ read-at-tako :: read-at-tako:ze
|
||||||
|= [for=(unit ship) tak=tako mun=mood] :: seek and read
|
|= [for=(unit ship) tak=tako mun=mood] :: seek and read
|
||||||
^- [(unit (unit cage)) _..park]
|
^- [(unit (unit cage)) _..park]
|
||||||
:: the commit must be known, and reachable from within this desk
|
:: non-zero commits must be known, and reachable from within this desk
|
||||||
::
|
::
|
||||||
?. ?& !=(0v0 tak)
|
?. ?| =(0v0 tak)
|
||||||
(~(has by hut.ran) tak)
|
?& (~(has by hut.ran) tak)
|
||||||
(~(has in (reachable-takos (aeon-to-tako:ze let.dom))) tak)
|
(~(has in (reachable-takos (aeon-to-tako:ze let.dom))) tak)
|
||||||
|(?=(~ for) (may-read u.for care.mun tak path.mun))
|
|(?=(~ for) (may-read u.for care.mun tak path.mun))
|
||||||
==
|
== ==
|
||||||
[~ ..park]
|
[~ ..park]
|
||||||
:: virtualize to catch and produce deterministic failures
|
:: virtualize to catch and produce deterministic failures
|
||||||
::
|
::
|
||||||
|
Loading…
Reference in New Issue
Block a user