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

hood: re-patch |rein

Browse Source 
Essentially reimplements #5863 in the generator, instead of the library.
This commit is contained in:
fang 2022-07-05 17:37:54 +02:00
parent c437f1cdbd
commit ddf3520648
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkg/arvo/gen/hood/rein.hoon
View File

@ -9,7 +9,9 @@
:- %kiln-rein :- %kiln-rein
:- desk :- desk
%+ roll arg %+ roll arg
=| =rein:hood =/ =rein:hood
=< rein.arak
.^(vat:hood %gx /(scot %p p.bec)/hood/(scot %da now)/kiln/vat/[desk]/noun)
|: [*[on=? =dude:gall] rein=rein(liv liv)] |: [*[on=? =dude:gall] rein=rein(liv liv)]
?: on ?: on
rein(add (~(put in add.rein) dude)) rein(add (~(put in add.rein) dude))

3
pkg/base-dev/sur/hood.hoon
View File

@ -180,8 +180,9 @@
=rein =rein
== ==
^- [jolt=(list dude) idle=(list dude)] ^- [jolt=(list dude) idle=(list dude)]
=/ all=(list dude) (read-bill local)
=/ want (get-apps-want local all rein)
=/ have (get-apps-live local) =/ have (get-apps-live local)
=/ want (get-apps-want local have rein)
[want (skip have ~(has in (sy want)))] [want (skip have ~(has in (sy want)))]
:: ::
++ get-remote-diff ++ get-remote-diff