2020-07-07 02:31:57 +03:00
|
|
|
/- *resource
|
|
|
|
|
/+ store=graph-store
|
|
|
|
|
|_ =bowl:gall
|
2020-06-27 00:13:12 +03:00
|
|
|
++ scry-for
|
|
|
|
|
|* [=mold =path]
|
|
|
|
|
.^ mold
|
|
|
|
|
%gx
|
|
|
|
|
(scot %p our.bowl)
|
|
|
|
|
%graph-store
|
|
|
|
|
(scot %da now.bowl)
|
|
|
|
|
(snoc `^path`path %noun)
|
|
|
|
|
==
|
|
|
|
|
::
|
|
|
|
|
++ get-graph
|
|
|
|
|
|= res=resource
|
2020-09-04 10:42:20 +03:00
|
|
|
^- update:store
|
|
|
|
|
%+ scry-for update:store
|
2020-07-07 03:02:15 +03:00
|
|
|
/graph/(scot %p entity.res)/[name.res]
|
2020-06-27 00:36:57 +03:00
|
|
|
::
|
2020-09-04 10:42:20 +03:00
|
|
|
++ get-update-log
|
|
|
|
|
|= rid=resource
|
|
|
|
|
^- update-log:store
|
|
|
|
|
%+ scry-for update-log:store
|
|
|
|
|
/update-log/(scot %p entity.rid)/[name.rid]
|
|
|
|
|
::
|
2020-06-27 00:36:57 +03:00
|
|
|
++ peek-log
|
|
|
|
|
|= res=resource
|
|
|
|
|
^- (unit time)
|
2020-06-30 04:14:55 +03:00
|
|
|
(scry-for (unit time) /peek-update-log/(scot %p entity.res)/[name.res])
|
2020-06-27 00:13:12 +03:00
|
|
|
--
|
