mirror of
https://github.com/urbit/shrub.git
synced 2024-12-22 10:21:31 +03:00
refactors event replay, removing unnecessary effect traversal
This commit is contained in:
parent
dfecb3a1cb
commit
a848191c50
58
vere/sist.c
58
vere/sist.c
@ -237,42 +237,42 @@ _sist_sing(u3_noun ovo)
|
||||
{
|
||||
u3_noun gon = u3m_soft(0, u3v_poke, u3k(ovo));
|
||||
|
||||
if ( u3_blip != u3h(gon) ) {
|
||||
_sist_suck(ovo, gon);
|
||||
}
|
||||
else {
|
||||
u3_noun vir = u3k(u3h(u3t(gon)));
|
||||
u3_noun cor = u3k(u3t(u3t(gon)));
|
||||
u3_noun nug;
|
||||
{
|
||||
u3_noun hed, tal;
|
||||
u3x_cell(gon, &hed, &tal);
|
||||
|
||||
u3z(gon);
|
||||
nug = u3v_nick(vir, cor);
|
||||
|
||||
if ( u3_blip != u3h(nug) ) {
|
||||
_sist_suck(ovo, nug);
|
||||
if ( u3_blip != hed ) {
|
||||
_sist_suck(ovo, gon);
|
||||
}
|
||||
else {
|
||||
vir = u3h(u3t(nug));
|
||||
cor = u3k(u3t(u3t(nug)));
|
||||
u3_noun vir, cor;
|
||||
u3x_cell(tal, &vir, &cor);
|
||||
|
||||
while ( u3_nul != vir ) {
|
||||
u3_noun fex = u3h(vir);
|
||||
u3_noun fav = u3t(fex);
|
||||
|
||||
if ( c3__init == u3h(fav) ) {
|
||||
u3A->own = u3k(u3t(fav));
|
||||
// note: c3__boot == u3h(u3t(ovo))
|
||||
u3A->fak = ( c3__fake == u3h(u3t(u3t(ovo))) ) ? c3y : c3n;
|
||||
}
|
||||
|
||||
vir = u3t(vir);
|
||||
}
|
||||
u3z(nug);
|
||||
u3z(u3A->roc);
|
||||
u3A->roc = cor;
|
||||
u3A->roc = u3k(cor);
|
||||
|
||||
{
|
||||
u3_noun tag, dat;
|
||||
u3x_trel(ovo, 0, &tag, &dat);
|
||||
|
||||
if ( c3__boot == tag ) {
|
||||
while ( u3_nul != vir ) {
|
||||
u3_noun fav = u3t(u3h(vir));
|
||||
|
||||
if ( c3__init == u3h(fav) ) {
|
||||
u3A->own = u3k(u3t(fav));
|
||||
u3A->fak = ( c3__fake == u3h(tag) ) ? c3y : c3n;
|
||||
}
|
||||
|
||||
vir = u3t(vir);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
u3z(ovo);
|
||||
}
|
||||
|
||||
u3z(gon);
|
||||
u3z(ovo);
|
||||
}
|
||||
|
||||
/* _sist_cask(): ask for a passcode.
|
||||
|
Loading…
Reference in New Issue
Block a user