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

More debugging for sync bug.

Browse Source
This commit is contained in:
C. Guy Yarvin 2013-10-09 00:13:08 -07:00
parent a7e81cad07
commit afcfb6e7fc
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
arvo/hoon.hoon
View File

@ -7423,11 +7423,15 @@
++ kick :: complete loop
|= mor=(list move)
=| ova=(list ovum)
=+ rom=mor
|- ^- [p=(list ovum) q=(list ,[p=@tas q=vase])]
?~ mor
[(flop ova) fan]
:: ~& [%kick-move q.i.mor -.r.i.mor]
?> ?=(^ q.i.mor)
?. ?=(^ q.i.mor)
~& [%kick-flat -.r.i.mor]
~& [%kick-rom rom]
$(mor t.mor)
?~ t.q.i.mor
$(mor t.mor, ova [[i.q.i.mor r.i.mor] ova])
?> ?=(^ i.q.i.mor)