ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-11-13 08:38:43 +03:00
Code Issues Packages Projects Releases Wiki Activity

arvo: restore original %xeno wires

Browse Source
This commit is contained in:
Joe Bryan 2020-02-06 14:34:01 -08:00
parent 9b09689d53
commit 624a40331c
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
pkg/arvo/sys/arvo.hoon
View File

@ -499,7 +499,9 @@
=/ =type [%cell [%atom %tas `%soft] %noun]
[%& type [%soft card.ovum]]
=/ =move
[duct=~ %pass wire.ovum vane mill]
~| [%poke %bad-wire wire.ovum]
?> ?=([%$ *] wire.ovum)
[duct=~ %pass t.wire.ovum vane mill]
(emit %$ move ~)
:: +spam: prepare a worklist for all targets
::
@ -578,15 +580,18 @@
=/ duct t.duct.move
=* gift gift.ball.move
::
:: the caller was Outside
::
?~ duct
::
:: the caller was Outside
::
~| [%xeno wire (symp -.q.p.gift)]
?> ?=([%$ *] wire)
(xeno wire gift)
::
:: the caller was a vane
::
=^ vane=term wire
~| [%give duct.move (symp -.q.p.gift)]
?>(?=(^ wire) wire)
::
~? &(!lac |(!=(%blit +>-.gift) !=(%d vane.gem)))
@ -655,7 +660,7 @@
|= way=term
~| [%plow-failed way]
=/ =vane
~| [%unknown-vane way]
~| [%missing-vane way]
(~(got by van) way)
(~(plow va [our vane]) now peek)
--