lib/graph: add +get-node
%+ scry-for update:store
/graph/(scot %p entity.res)/[name.res]
::
+++ get-node
+ |= [res=resource =index:store]
+ ^- node:store
+ =+ %+ scry-for ,=update:store
+ %+ weld
+ /node/(scot %p entity.res)/[name.res]
+ (turn index (cury scot %ud))
+ ?> ?=(%0 -.update)
+ ?> ?=(%add-nodes -.q.update)
+ ?> ?=(^ nodes.q.update)
+ q.n.nodes.q.update
+::
++ get-update-log
|= rid=resource
^- update-log:store
