mirror of
https://github.com/ilyakooo0/urbit.git
synced 2025-01-01 19:46:36 +03:00
Eliminate old-fashioned burn.
This commit is contained in:
parent
76d3f2e897
commit
55e895036c
@ -551,6 +551,7 @@
|
||||
# define c3__i c3_s1('i')
|
||||
# define c3__ic c3_s2('i','c')
|
||||
# define c3__ice c3_s3('i','c','e')
|
||||
# define c3__iced c3_s4('i','c','e','d')
|
||||
# define c3__if c3_s2('i','f')
|
||||
# define c3__ifix c3_s4('i','f','i','x')
|
||||
# define c3__in c3_s2('i','n')
|
||||
|
@ -567,31 +567,6 @@
|
||||
return u3nc(u3qf_face(p_gen, sut), u3nc(0, 1));
|
||||
}
|
||||
|
||||
case c3__ktsg: p_gen = u3t(gen);
|
||||
_mint_used();
|
||||
{
|
||||
u3_noun nef = _mint_in(van, sut, gol, p_gen);
|
||||
u3_noun p_nef = u3h(nef);
|
||||
u3_noun q_nef = u3t(nef);
|
||||
u3_noun fom;
|
||||
|
||||
{
|
||||
u3_noun cag = u3qfu_burn(van, sut);
|
||||
u3_noun wim = u3n_nock_an(cag, u3k(q_nef));
|
||||
|
||||
if ( 0 == u3h(wim) ) {
|
||||
fom = u3nc(1, u3k(u3t(wim)));
|
||||
} else {
|
||||
fom = u3k(q_nef);
|
||||
}
|
||||
u3z(wim);
|
||||
}
|
||||
ret = u3nc(u3k(p_nef), fom);
|
||||
|
||||
u3z(nef);
|
||||
return ret;
|
||||
}
|
||||
|
||||
case c3__ktls: u3x_cell(u3t(gen), &p_gen, &q_gen);
|
||||
_mint_used();
|
||||
{
|
||||
@ -719,7 +694,8 @@
|
||||
return ret;
|
||||
}
|
||||
|
||||
case c3__cold: p_gen = u3t(gen);
|
||||
case c3__cold:
|
||||
case c3__ktsg: p_gen = u3t(gen);
|
||||
_mint_used();
|
||||
{
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user