ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-17 20:01:32 +03:00
Code Issues Packages Projects Releases Wiki Activity

Clean out much of non-e2e ames.

Browse Source
This commit is contained in:
C. Guy Yarvin 2017-05-21 16:32:33 -07:00
parent 34d1c3a41f
commit ebf644d81d
2 changed files with 5 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
arvo/ames.hoon
View File

@ -1083,9 +1083,9 @@
$(sox t.sox, bin (weld p.bun bin)) $(sox t.sox, bin (weld p.bun bin))
:: ::
++ wise :: wise:am ++ wise :: wise:am
|= {soq/sock hen/duct cha/path val/* ete/?} :: send a statement |= {soq/sock hen/duct cha/path val/*} :: send a statement
^- {p/(list boon) q/fort} ^- {p/(list boon) q/fort}
zork:zank:(wool:(ho:(um p.soq) q.soq) hen cha val ete) zork:zank:(wool:(ho:(um p.soq) q.soq) hen cha val)
:: ::
++ um :: per server ++ um :: per server
|= our/ship |= our/ship
@ -1327,11 +1327,6 @@
$buck $buck
=. +> ?.(=(%full aut) +> cock) :: finish key exch =. +> ?.(=(%full aut) +> cock) :: finish key exch
+>(..la (tock p.fud q.fud r.fud)) +>(..la (tock p.fud q.fud r.fud))
::
$bond
:: ~& [%bond q.fud r.fud]
?> =(p:sen:gus p.fud)
(dear q.fud r.fud ?-(kay $dead ~, $good [~ s.fud]))
:: ::
$bund $bund
:: ~& [%bund q.fud r.fud] :: ~& [%bund q.fud r.fud]
@ -1461,7 +1456,7 @@
(busk xong:diz feh) (busk xong:diz feh)
:: ::
++ wool :: wool:ho:um:am ++ wool :: wool:ho:um:am
|= {hen/duct cha/path val/* ete/?} :: send a statement |= {hen/duct cha/path val/*} :: send a statement
^+ +> ^+ +>
=+ ^= rol ^- rill =+ ^= rol ^- rill
=+ rol=(~(get by ryl.bah) cha) =+ rol=(~(get by ryl.bah) cha)
@ -1473,9 +1468,7 @@
rol(sed +(sed.rol), san (~(put by san.rol) sex hen)) rol(sed +(sed.rol), san (~(put by san.rol) sex hen))
=+ cov=[p=p:sen:gus q=clon:diz] =+ cov=[p=p:sen:gus q=clon:diz]
%+ wind [cha sex] %+ wind [cha sex]
?: ete
[%bund q.cov cha sex val] [%bund q.cov cha sex val]
[%bond q.cov cha sex val]
:: ::
++ zest :: zest:ho:um:am ++ zest :: zest:ho:um:am
:~ :~ :* [%rtt rtt.sop.bah] :~ :~ :* [%rtt rtt.sop.bah]
@ -1834,12 +1827,9 @@
:: ::
$wake $wake
(~(wake am [now fox]) hen) (~(wake am [now fox]) hen)
::
$want
(~(wise am [now fox]) p.kyz hen q.kyz r.kyz |)
:: ::
$wont $wont
(~(wise am [now fox]) p.kyz hen q.kyz r.kyz &) (~(wise am [now fox]) p.kyz hen q.kyz r.kyz)
== ==
=> %_(. fox q.fuy) => %_(. fox q.fuy)
=| out/(list move) =| out/(list move)

2
arvo/zuse.hoon
View File

@ -2466,7 +2466,6 @@
++ meal :: payload ++ meal :: payload
$% {$back p/cape q/flap r/@dr} :: acknowledgment $% {$back p/cape q/flap r/@dr} :: acknowledgment
{$buck p/coop q/flap r/@dr} :: e2e ack {$buck p/coop q/flap r/@dr} :: e2e ack
{$bond p/life q/path r/@ud s/*} :: message
{$bund p/life q/path r/@ud s/*} :: e2e message {$bund p/life q/path r/@ud s/*} :: e2e message
{$carp p/@ q/@ud r/@ud s/flap t/@} :: skin+inx+cnt+hash {$carp p/@ q/@ud r/@ud s/flap t/@} :: skin+inx+cnt+hash
{$fore p/ship q/(unit lane) r/@} :: forwarded packet {$fore p/ship q/(unit lane) r/@} :: forwarded packet
@ -2688,7 +2687,6 @@
{$make p/(unit @t) q/@ud r/@ s/?} :: wild license {$make p/(unit @t) q/@ud r/@ s/?} :: wild license
{$sith p/@p q/@uw r/?} :: imperial generator {$sith p/@p q/@uw r/?} :: imperial generator
{$wake $~} :: timer activate {$wake $~} :: timer activate
{$want p/sock q/path r/*} :: send message
{$wegh $~} :: report memory {$wegh $~} :: report memory
{$west p/sack q/path r/*} :: network request {$west p/sack q/path r/*} :: network request
{$wont p/sock q/path r/*} :: e2e send message {$wont p/sock q/path r/*} :: e2e send message