ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 10:02:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

graph-store: added jet hints and a json conversion path

Browse Source
This commit is contained in:
Logan Allen 2020-06-23 12:16:12 -04:00
parent fd632b26ae
commit 634b0d1175
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pkg/arvo/app/graph-store.hoon
View File

@ -1,4 +1,5 @@
/+ store=graph-store, sigs=signatures, default-agent, dbug /+ store=graph-store, sigs=signatures, default-agent, dbug
~% %graph-store-top ..is ~
|% |%
+$ card card:agent:gall +$ card card:agent:gall
+$ versioned-state +$ versioned-state
@ -14,6 +15,7 @@
:: ::
%- agent:dbug %- agent:dbug
^- agent:gall ^- agent:gall
~% %graph-store-agent ..card ~
|_ =bowl:gall |_ =bowl:gall
+* this . +* this .
def ~(. (default-agent this %|) bowl) def ~(. (default-agent this %|) bowl)
@ -26,6 +28,7 @@
[~ this(state !<(state-0 old))] [~ this(state !<(state-0 old))]
:: ::
++ on-poke ++ on-poke
~/ %graph-store-poke
|= [=mark =vase] |= [=mark =vase]
^- (quip card _this) ^- (quip card _this)
|^ |^
@ -33,6 +36,7 @@
=^ cards state =^ cards state
?+ mark (on-poke:def mark vase) ?+ mark (on-poke:def mark vase)
%graph-action (graph-action !<(action:store vase)) %graph-action (graph-action !<(action:store vase))
%json (graph-action (action:dejs:store !<(json vase)))
== ==
[cards this] [cards this]
:: ::
@ -297,6 +301,7 @@
-- --
:: ::
++ on-watch ++ on-watch
~/ %graph-store-watch
|= =path |= =path
^- (quip card _this) ^- (quip card _this)
|^ |^
@ -315,6 +320,7 @@
-- --
:: ::
++ on-peek ++ on-peek
~/ %graph-store-peek
|= =path |= =path
^- (unit (unit cage)) ^- (unit (unit cage))
?+ path (on-peek:def path) ?+ path (on-peek:def path)