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

clay: use XX for things that really need to change

Browse Source
This commit is contained in:
Philip Monk 2022-03-25 12:33:48 -07:00
parent 0c3eee07b5
commit 99a10aa7a8
1 changed files with 11 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
pkg/arvo/sys/vane/clay.hoon
View File

@ -330,7 +330,7 @@
== :: == ::
$: %behn :: $: %behn ::
$% $>(%wake gift:behn) :: timer activate $% $>(%wake gift:behn) :: timer activate
$>(%writ gift) :: XX %slip $>(%writ gift) ::
== == :: == == ::
$: %clay :: $: %clay ::
$> $? %mere :: $> $? %mere ::
@ -1098,7 +1098,7 @@
++ de :: per desk ++ de :: per desk
|= [now=@da rof=roof hen=duct raft] |= [now=@da rof=roof hen=duct raft]
|= [her=ship syd=desk] |= [her=ship syd=desk]
:: XX ruf=raft crashes in the compiler :: NB: ruf=raft crashes in the compiler
:: ::
=* ruf |3.+6.^$ =* ruf |3.+6.^$
:: ::
@ -1478,9 +1478,9 @@
:: ::
:: Guaranteed to finish in one event. :: Guaranteed to finish in one event.
:: ::
:: XX needs to check that head is ancestor of tako :: TODO: needs to check that head is ancestor of tako
:: XX needs to check tako in rang :: TODO: needs to check tako in rang
:: XX needs to check that commit doesn't have same date :: TODO: needs to check that commit doesn't have same date
:: ::
++ park ++ park
=/ check-sane | =/ check-sane |
@ -1993,7 +1993,7 @@
== ==
:: Assert we calculated the same change-cages w/o cache :: Assert we calculated the same change-cages w/o cache
:: ::
:: XX remove deletes :: ? remove deletes
:: ::
=/ all-changes=(map path (each page lobe)) =/ all-changes=(map path (each page lobe))
=/ original=(map path (each page lobe)) =/ original=(map path (each page lobe))
@ -2950,20 +2950,20 @@
?.((~(has in b) hen) c [a c]) ?.((~(has in b) hen) c [a c])
:: ::
?~ ref ?~ ref
=> .(ref `(unit rind)`ref) :: XX TMI => .(ref `(unit rind)`ref)
?: =(~ wos) ..cancel-request :: XX handle? ?: =(~ wos) ..cancel-request :: TODO handle?
|- ^+ ..cancel-request |- ^+ ..cancel-request
?~ wos ..cancel-request ?~ wos ..cancel-request
=. ..cancel-request (run-if-future rove.i.wos |=(@da (best hen +<))) =. ..cancel-request (run-if-future rove.i.wos |=(@da (best hen +<)))
$(wos t.wos) $(wos t.wos)
:: ::
?~ nux=(~(get by fod.u.ref) hen) ?~ nux=(~(get by fod.u.ref) hen)
..cancel-request(ref `(unit rind)`ref) :: XX TMI ..cancel-request(ref `(unit rind)`ref)
=: fod.u.ref (~(del by fod.u.ref) hen) =: fod.u.ref (~(del by fod.u.ref) hen)
bom.u.ref (~(del by bom.u.ref) u.nux) bom.u.ref (~(del by bom.u.ref) u.nux)
== ==
%. [hen her u.nux [syd ~]] %. [hen her u.nux [syd ~]]
send-over-ames(ref `(unit rind)`ref) :: XX TMI send-over-ames(ref `(unit rind)`ref)
:: ::
:: Handles a request. :: Handles a request.
:: ::
@ -3656,8 +3656,6 @@
:: These convert between aeon (version number), tako (commit hash), yaki :: These convert between aeon (version number), tako (commit hash), yaki
:: (commit data structure), lobe (content hash), and blob (content). :: (commit data structure), lobe (content hash), and blob (content).
:: ::
:: XX the following are duplicated from the +state core
::
++ aeon-to-tako ~(got by hit.dom) ++ aeon-to-tako ~(got by hit.dom)
++ aeon-to-yaki |=(=aeon (tako-to-yaki (aeon-to-tako aeon))) ++ aeon-to-yaki |=(=aeon (tako-to-yaki (aeon-to-tako aeon)))
++ lobe-to-blob ~(got by lat.ran) ++ lobe-to-blob ~(got by lat.ran)
@ -4255,7 +4253,7 @@
:: ::
=/ req=task ((harden task) wrapped-task) =/ req=task ((harden task) wrapped-task)
:: ::
:: XX handle error notifications :: TODO handle error notifications
:: ::
?^ dud ?^ dud
[[[hen %slip %d %flog %crud [-.req tang.u.dud]] ~] ..^$] [[[hen %slip %d %flog %crud [-.req tang.u.dud]] ~] ..^$]