dbug: add scry endpoints

Allow scrying out of state and subscriptions for apps that use /lib/dbug
This commit is contained in:
Fang 2020-05-08 01:42:29 +02:00
parent 664275c9f1
commit 4a6329eb09
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972

View File

@ -90,6 +90,17 @@
==
==
::
++ on-peek
|= =path
^- (unit (unit cage))
?. ?=([@ %dbug *] path)
(on-peek:ag path)
?+ path [~ ~]
[%u %dbug ~] ``noun+!>(&)
[%x %dbug %state ~] ``noun+!>(on-save:ag)
[%x %dbug %subscriptions ~] ``noun+!>([wex sup]:bowl)
==
::
++ on-init
^- (quip card:agent:gall agent:gall)
=^ cards agent on-init:ag
@ -115,8 +126,6 @@
=^ cards agent (on-leave:ag path)
[cards this]
::
++ on-peek on-peek:ag
::
++ on-agent
|= [=wire =sign:agent:gall]
^- (quip card:agent:gall agent:gall)