mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-11-13 08:38:43 +03:00
Merge pull request #3910 from urbit/lf/graph-cleanup
graph-store: run-updates no longer pokes itself
This commit is contained in:
commit
565fc46660
@ -505,26 +505,23 @@
|
|||||||
^- (quip card _state)
|
^- (quip card _state)
|
||||||
?< (~(has by archive) resource)
|
?< (~(has by archive) resource)
|
||||||
?> (~(has by graphs) resource)
|
?> (~(has by graphs) resource)
|
||||||
:_ state
|
=/ updates=(list [=time upd=logged-update:store])
|
||||||
%+ turn (tap:orm-log update-log)
|
(tap:orm-log update-log)
|
||||||
|= [=time update=logged-update:store]
|
=| cards=(list card)
|
||||||
^- card
|
|- ^- (quip card _state)
|
||||||
?> ?=(%0 -.update)
|
?~ updates
|
||||||
:* %pass
|
[cards state]
|
||||||
/run-updates/(scot %da time)
|
=* update upd.i.updates
|
||||||
%agent
|
=^ crds state
|
||||||
[our.bowl %graph-store]
|
%- graph-update
|
||||||
%poke
|
^- update:store
|
||||||
:- %graph-update
|
?- -.q.update
|
||||||
!>
|
%add-nodes update(resource.q resource)
|
||||||
^- update:store
|
%remove-nodes update(resource.q resource)
|
||||||
?- -.q.update
|
%add-signatures update(resource.uid.q resource)
|
||||||
%add-nodes update(resource.q resource)
|
%remove-signatures update(resource.uid.q resource)
|
||||||
%remove-nodes update(resource.q resource)
|
==
|
||||||
%add-signatures update(resource.uid.q resource)
|
$(cards (weld cards crds), updates t.updates)
|
||||||
%remove-signatures update(resource.uid.q resource)
|
|
||||||
==
|
|
||||||
==
|
|
||||||
::
|
::
|
||||||
++ validate-graph
|
++ validate-graph
|
||||||
|= [=graph:store mark=(unit mark:store)]
|
|= [=graph:store mark=(unit mark:store)]
|
||||||
|
Loading…
Reference in New Issue
Block a user