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

clarifies comments, removes todos, minor refactoring

Browse Source
This commit is contained in:
Joe Bryan 2018-10-15 00:11:36 -04:00
parent 7a97a1c78a
commit 83661c095a
2 changed files with 17 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
sys/vane/ames.hoon
View File

@ -18,7 +18,7 @@
--
::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: section 4aA, identity logic ::
:: removed ::
:: removed in favor of jael/ethereum ::
::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: section 4aB, packet format ::
@ -80,7 +80,6 @@
++ clon
^- life
:: if we don't have a +deed for :her, we guess 1
:: XX should we keep guessing 0? is this used for crypto?
::
?~(lew.wod.dur 1 life.u.lew.wod.dur)
:: XX move this logic into %zuse, namespaced under %jael?
@ -127,7 +126,7 @@
*
:: our initial sponsor
::
:: XX ensure initial?
:: XX jael scry
::
=(her (sein:title our))
==
@ -299,13 +298,16 @@
(en:cub:cluy q.u.yed.caq.dur (jam ham))
?: &(=(~ lew.wod.dur) =(%back -.ham))
[wasp ..wisp]
:: we include our deed in asymmetric skins (%open and %full)
:: if we're a comet or moon, or if we're sponsoring her
::
=/ bil=(unit deed)
?. ?| ?=(?(%earl %pawn) (clan:title our))
?& =(our (sein:title her))
:: XX is this necessary?
::
!=(our her)
== ==
=/ rac (clan:title our)
?. ?| ?=(?(%earl %pawn) rac)
:: XX jael scry
::
?&(!?=(%czar rac) =(our (sein:title her)))
==
~
`law.saf
=/ yig sen
@ -612,13 +614,10 @@
?> (~(has by vein) life)
?> =(life (roll ~(tap in ~(key by vein)) max))
::
~| %vein-stub
~| %strange-vein
?< (~(has by urb.ton.fox) our)
::
=/ can=(list ship)
%- flop
|- ^- (list ship)
?:((lth our 256) ~ =+(seg=(sein:title our) [seg $(our seg)]))
=/ can=(list ship) (tail (saxo:title our))
::
=/ new=wund
%+ turn
@ -822,7 +821,7 @@
:: request keys and continue processing packet if
:: :her is our initial sponsor (TOFU)
::
:: XX ensure initial?
:: XX jael scry
:: XX update state so we only ask once?
::
=? +>.$ ?& =(~ lew.wod.dur.diz)
@ -830,9 +829,9 @@
==
(emit %beer our her)
:: request keys and drop packet if :her is (or is a moon of)
:: an unfamilar on-chain ship (and not our initial sponsor)
:: an unfamilar on-chain ship (and not our sponsor)
::
:: XX ensure initial?
:: XX jael scry?
::
=/ rac (clan:title her)
=/ seg (sein:title her)

2
sys/zuse.hoon
View File

@ -577,7 +577,7 @@
olz/(map flap cape) :: packets completed
wab/(map ship bath) :: relationship
== ::
+$ deed [=life =pass oath=(unit oath:pki:jael)] :: stage/pub/sig
+$ deed [=life =pass oath=(unit oath:pki:jael)] :: life/pub/sig
++ dore :: foreign contact
$: wod/road :: connection to
caq/clot :: symmetric key state