ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-18 20:31:40 +03:00
Code Issues Packages Projects Releases Wiki Activity

gall,eyre,dojo,azimuth,dbug: gall claims the [%$ *] namespace

Browse Source
This commit is contained in:
~wicrum-wicrun 2023-04-24 21:53:52 +02:00
parent 6355b84d35
commit 05304146a7
6 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkg/arvo/app/azimuth.hoon
View File

@ -263,7 +263,7 @@
:: ~& >> %no-logs-in-azimuth-state :: ~& >> %no-logs-in-azimuth-state
number.id.sap.state number.id.sap.state
=+ [our=(scot %p our.bowl) now=(scot %da now.bowl)] =+ [our=(scot %p our.bowl) now=(scot %da now.bowl)]
=+ .^(dudes=(set [dude:gall ?]) %ge our %base now /) =+ .^(dudes=(set [dude:gall ?]) %ge our %base now /$)
=/ running=? (~(has in dudes) [%eth-watcher &]) =/ running=? (~(has in dudes) [%eth-watcher &])
=/ installed=? =/ installed=?
|((~(has in dudes) [%eth-watcher &]) (~(has in dudes) [%eth-watcher |])) |((~(has in dudes) [%eth-watcher &]) (~(has in dudes) [%eth-watcher |]))

2
pkg/arvo/app/dbug.hoon
View File

@ -433,7 +433,7 @@
^- (list dude:gall) ^- (list dude:gall)
=- (turn ~(tap in -) head) =- (turn ~(tap in -) head)
;; (set [dude:gall ?]) ::TODO for some reason we need this? ;; (set [dude:gall ?]) ::TODO for some reason we need this?
(scry (set [dude:gall ?]) %ge desk /) (scry (set [dude:gall ?]) %ge desk /$)
:: ::
++ running ++ running
|= app=term |= app=term

2
pkg/arvo/app/dojo.hoon
View File

@ -129,7 +129,7 @@
=/ =desk =/ =desk
::TODO maybe should recognize if the user specified a desk explicitly. ::TODO maybe should recognize if the user specified a desk explicitly.
:: currently eats the :app|desk#gen case. :: currently eats the :app|desk#gen case.
=+ gop=(en-beam dir(q q.gol, s /)) =+ gop=(en-beam dir(q q.gol, s /$))
?. .^(? %gu gop) ?. .^(? %gu gop)
q.dir q.dir
.^(desk %gd gop) .^(desk %gd gop)

2
pkg/arvo/gen/gall-nonces.hoon
View File

@ -6,5 +6,5 @@
^- (list [dude:gall @ud]) ^- (list [dude:gall @ud])
%+ sort %+ sort
%~ tap by %~ tap by
.^((map dude:gall @ud) %gf /(scot %p p.bec)//(scot %da now)) .^((map dude:gall @ud) %gf /(scot %p p.bec)//(scot %da now)/$)
|=([[* a=@ud] [* b=@ud]] (lth a b)) |=([[* a=@ud] [* b=@ud]] (lth a b))

2
pkg/arvo/sys/vane/eyre.hoon
View File

@ -1792,7 +1792,7 @@
?~ sub ?~ sub
((trace 0 |.("no subscription for request-id {(trip request-id)}")) ~) ((trace 0 |.("no subscription for request-id {(trip request-id)}")) ~)
=/ des=(unit (unit cage)) =/ des=(unit (unit cage))
(rof ~ %gd [our app.u.sub da+now] ~) (rof ~ %gd [our app.u.sub da+now] /$)
?. ?=([~ ~ *] des) ?. ?=([~ ~ *] des)
((trace 0 |.("no desk for app {<app.u.sub>}")) ~) ((trace 0 |.("no desk for app {<app.u.sub>}")) ~)
`!<(=desk q.u.u.des) `!<(=desk q.u.u.des)

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

@ -2057,6 +2057,16 @@
== ==
~ ~
:: ::
?. ?=([%$ *] path) :: [%$ *] is for the vane, all else is for the agent
?. ?& =(our ship)
=([%$ %da now] coin)
== ~
?. (~(has by yokes.state) dap) [~ ~]
?. ?=(^ path) ~
=/ =routes [~ ship]
(mo-peek:mo & dap routes care path)
::
=> .(path t.path)
?: &(=(care %$) =(path /whey)) ?: &(=(care %$) =(path /whey))
=/ blocked =/ blocked
=/ queued (~(run by blocked.state) |=((qeu blocked-move) [%.y +<])) =/ queued (~(run by blocked.state) |=((qeu blocked-move) [%.y +<]))
@ -2152,16 +2162,6 @@
?~ las=(ram:on-path fan.u.ski) [~ ~] ?~ las=(ram:on-path fan.u.ski) [~ ~]
``case/!>(ud/key.u.las) ``case/!>(ud/key.u.las)
:: ::
?. ?=([%$ *] path) :: [%$ *] is for the vane, all else is for the agent
?. ?& =(our ship)
=([%$ %da now] coin)
== ~
?. (~(has by yokes.state) dap) [~ ~]
?. ?=(^ path) ~
=/ =routes [~ ship]
(mo-peek:mo & dap routes care path)
::
=> .(path t.path)
?: ?=(%x care) ?: ?=(%x care)
?. =(p.bem our) ~ ?. =(p.bem our) ~
?~ yok=(~(get by yokes.state) q.bem) ~ ?~ yok=(~(get by yokes.state) q.bem) ~