ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-25 16:05:27 +03:00
Code Issues Packages Projects Releases Wiki Activity

arvo: adds |meld, triggering memory unification

Browse Source
This commit is contained in:
Joe Bryan 2020-09-09 22:50:43 -07:00
parent 7f0b500778
commit 31fe240632
4 changed files with 22 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
pkg/arvo/gen/hood/meld.hoon Normal file
View File

@ -0,0 +1,13 @@
:: Helm: unify memory
::
:::: /hoon/meld/hood/gen
::
/? 310
::
::::
::
:- %say
|= $: [now=@da eny=@uvJ bec=beak]
[arg=~ ~]
==
[%helm-meld ~]

5
pkg/arvo/lib/hood/helm.hoon
View File

@ -100,6 +100,10 @@
|= ~
abet:(emit %pass way.mass-timer.sat %arvo %b %rest nex.mass-timer.sat)
::
++ poke-meld
|= ~ =< abet
(emit %pass /pack %arvo %d %flog %meld ~)
::
++ poke-pack
|= ~ =< abet
(emit %pass /pack %arvo %d %flog %pack ~)
@ -228,6 +232,7 @@
%helm-hi =;(f (f !<(_+<.f vase)) poke-hi)
%helm-knob =;(f (f !<(_+<.f vase)) poke-knob)
%helm-mass =;(f (f !<(_+<.f vase)) poke-mass)
%helm-meld =;(f (f !<(_+<.f vase)) poke-meld)
%helm-moon =;(f (f !<(_+<.f vase)) poke-moon)
%helm-pack =;(f (f !<(_+<.f vase)) poke-pack)
%helm-rekey =;(f (f !<(_+<.f vase)) poke-rekey)

1
pkg/arvo/sys/vane/dill.hoon
View File

@ -117,6 +117,7 @@
$blew (send %rez p.p.kyz q.p.kyz)
$heft (dump %whey ~)
$lyra (dump kyz)
$meld (dump kyz)
$pack (dump kyz)
$crop (dump trim+p.kyz)
$veer (dump kyz)

3
pkg/arvo/sys/zuse.hoon
View File

@ -1110,6 +1110,7 @@
{$init p/@p} :: set owner
{$logo ~} :: logout
[%lyra hoon=(unit @t) arvo=@t] :: upgrade kernel
{$meld ~} :: unify memory
{$pack ~} :: compact memory
{$trim p/@ud} :: trim kernel state
{$veer p/@ta q/path r/@t} :: install vane
@ -1131,6 +1132,7 @@
{$harm ~} :: all terms hung up
$>(%init vane-task) :: after gall ready
[%lyra hoon=(unit @t) arvo=@t] :: upgrade kernel
{$meld ~} :: unify memory
{$noop ~} :: no operation
{$pack ~} :: compact memory
{$talk p/tank} ::
@ -1198,6 +1200,7 @@
{$crud p/@tas q/(list tank)} ::
{$heft ~} ::
[%lyra hoon=(unit @t) arvo=@t] :: upgrade kernel
{$meld ~} :: unify memory
{$pack ~} :: compact memory
{$text p/tape} ::
{$veer p/@ta q/path r/@t} :: install vane