graph-store: updated tree type in import flow
$: %0
p=time
$= q
- $% [%add-nodes =resource:store nodes=(tree [index:store tree-node])]
+ $% [%add-graph =resource:store =tree-graph mark=(unit ^mark) ow=?]
+ [%add-nodes =resource:store nodes=(tree [index:store tree-node])]
[%remove-nodes =resource:store indices=(tree index:store)]
[%add-signatures =uid:store signatures=tree-signatures]
[%remove-signatures =uid:store signatures=tree-signatures]
^- logged-update:store
:+ %0 p.t
?- -.q.t
+ %add-graph
+ :* %add-graph
+ resource.q.t
+ (remake-graph tree-graph.q.t)
+ mark.q.t
+ ow.q.t
+ ==
+ ::
%add-nodes
:- %add-nodes
:- resource.q.t
