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

sss: rocks.rule=0 now means "store genesis and one snapshot"

Browse Source
This commit is contained in:
~wicrum-wicrun 2023-06-30 15:11:46 +02:00
parent 6009e5f209
commit d98dfbe4db
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
pkg/base-dev/lib/sss.hoon
View File

@ -189,12 +189,14 @@
?@ tid.buoy-0 tid.buoy-0 ?@ tid.buoy-0 tid.buoy-0
^- tide ^- tide
%= tid.buoy-0 %= tid.buoy-0
rocks.rul +(rocks.rul.tid.buoy-0)
mem mem
^- (jug ship dude) ^- (jug ship dude)
%- ~(run by mem.tid.buoy-0) %- ~(run by mem.tid.buoy-0)
|= =(map dude @da) |= =(map dude @da)
^- (set dude) ^- (set dude)
~(key by map) ~(key by map)
::
== ==
== ==
== ==
@ -237,7 +239,7 @@
%+ ~(jab by pub) path %+ ~(jab by pub) path
|= =buoy |= =buoy
?@ tid.buoy buoy ?@ tid.buoy buoy
%* . buoy(tid (form tid.buoy(rul [0 1]))) %* . buoy(tid (form tid.buoy(rul [1 1])))
rul.tid rul.tid.buoy rul.tid rul.tid.buoy
wav.tid ~ wav.tid ~
== ==
@ -418,8 +420,10 @@
=/ max-rock=[=aeon =rock:lake] (fall (pry:rok rok.tide) *[key val]:rok) =/ max-rock=[=aeon =rock:lake] (fall (pry:rok rok.tide) *[key val]:rok)
=/ max-wave (fall (bind (ram:wav wav.tide) head) 0) =/ max-wave (fall (bind (ram:wav wav.tide) head) 0)
=. rok.tide =. rok.tide
=- ?. =(rocks.rul.tide 0) -
(put:rok - (fall (ram:rok rok.tide) *[key val]:rok))
%+ gas:rok +<-:gas:rok %+ gas:rok +<-:gas:rok
%- tab:rok :_ [~ +(rocks.rul.tide)] %- tab:rok :_ [~ ?:(=(rocks.rul.tide 0) 1 rocks.rul.tide)]
?: ?| =(waves.rul.tide 0) ?: ?| =(waves.rul.tide 0)
(lth max-wave (add aeon.max-rock waves.rul.tide)) (lth max-wave (add aeon.max-rock waves.rul.tide))
== ==