urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-01 14:42:02 +03:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #5855 from urbit/m/gall-quieter

Browse Source 
gall: exclude from traces
This commit is contained in:
fang 2022-07-06 18:48:55 +02:00 committed by GitHub
commit c437f1cdbd
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 9 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
pkg/arvo/sys/vane/gall.hoon
View File

@ -1,5 +1,4 @@
!: :: %gall, agent execution
:: :: %gall, agent execution
!? 163 !? 163
:: ::
:::: ::::
@ -530,7 +529,7 @@
|= [=wire =sign-arvo] |= [=wire =sign-arvo]
^+ mo-core ^+ mo-core
:: ::
?+ -.wire !! ?+ -.wire (mean 'gall: bad sys wire' >wire< ~)
%lyv (mo-handle-sys-lyv wire sign-arvo) %lyv (mo-handle-sys-lyv wire sign-arvo)
%era (mo-handle-sys-era wire sign-arvo) %era (mo-handle-sys-era wire sign-arvo)
%cor (mo-handle-sys-cor wire sign-arvo) %cor (mo-handle-sys-cor wire sign-arvo)
@ -664,7 +663,7 @@
=/ =ship (slav %p i.t.wire) =/ =ship (slav %p i.t.wire)
=/ foreign-agent i.t.t.wire =/ foreign-agent i.t.t.wire
:: ::
?+ sign-arvo !! ?+ sign-arvo (mean 'gall: strange sign' >[- +<]:sign-arvo< ~)
[%ames %done *] [%ames %done *]
=^ remote-request outstanding.state =^ remote-request outstanding.state
?~ t.t.t.wire ?~ t.t.t.wire
@ -703,7 +702,7 @@
?^ t.t.t.wire ?^ t.t.t.wire
:: kill subscriptions which use the old wire format :: kill subscriptions which use the old wire format
:: ::
!! ~_('gall: killing old style subscription' !!)
=/ =ames-response ;;(ames-response payload.sign-arvo) =/ =ames-response ;;(ames-response payload.sign-arvo)
(mo-handle-ames-response ames-response) (mo-handle-ames-response ames-response)
:: ::
@ -1072,7 +1071,7 @@
^- (list move) ^- (list move)
:: ::
?- -.card ?- -.card
%slip !! %slip ~_('gall: non-slip' !!)
:: ::
%give %give
=/ =gift:agent p.card =/ =gift:agent p.card
@ -1238,8 +1237,8 @@
%watch-as (ap-subscribe-as +.deal) %watch-as (ap-subscribe-as +.deal)
%poke (ap-poke +.deal) %poke (ap-poke +.deal)
%watch (ap-subscribe +.deal) %watch (ap-subscribe +.deal)
%raw-poke !! %raw-poke ~_('gall: %raw-poke unapplicable' !!)
%poke-as !! %poke-as ~_('gall: %poke-as unapplicable' !!)
%leave ap-load-delete %leave ap-load-delete
== ==
:: +ap-peek: peek. :: +ap-peek: peek.
@ -1338,7 +1337,7 @@
(ap-install(agent.yoke &+agent) `old-state) (ap-install(agent.yoke &+agent) `old-state)
?~ error ?~ error
ap-core ap-core
(mean >%load-failed< u.error) (mean 'gall: load failed' (flop u.error))
:: +ap-subscribe-as: apply %watch-as. :: +ap-subscribe-as: apply %watch-as.
:: ::
++ ap-subscribe-as ++ ap-subscribe-as
@ -1731,7 +1730,7 @@
== ==
:: +load: recreate vane; note, only valid if called from pupa :: +load: recreate vane; note, only valid if called from pupa
:: ::
++ load !! ++ load ~_('gall: adult load' !!)
:: +scry: standard scry :: +scry: standard scry
:: ::
++ scry ++ scry