graph-store: update indices in post on migrate
~(tap by nodes)
|= [=index:store =node:store]
^- [index:store node:store]
- :- (turn index maybe-unix-to-da)
+ :- (convert-unix-timestamped-index index)
(convert-unix-timestamped-node node)
::
++ remove-nodes
%- ~(gas in *(set index:store))
%+ turn
~(tap in indices)
- |=(=index:store (turn index maybe-unix-to-da))
+ convert-unix-timestamped-index
--
::
++ maybe-unix-to-da
^- node:store
?. ?=(%graph -.children.node)
node
- :+ post.node %graph
+ :+ post.node(index (convert-unix-timestamped-index index.post.node))
+ %graph
(convert-unix-timestamped-graph p.children.node)
::
+ ++ convert-unix-timestamped-index
+ |= =index:store
+ (turn index maybe-unix-to-da)
+ ::
++ convert-unix-timestamped-graph
|= =graph:store
%+ gas:orm *graph:store
