urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-23 10:52:12 +03:00
Code Issues Packages Projects Releases Wiki Activity

About to move tshx to tstr.

Browse Source
This commit is contained in:
C. Guy Yarvin 2016-01-16 00:30:22 -08:00
parent 2d4045f3c9
commit 0c597de194
3 changed files with 3 additions and 46 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
jets/f/ut_mint.c
View File

@ -659,20 +659,7 @@
u3z(dov); u3z(dov);
return ret; return ret;
} }
case c3__tstr: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen); case c3__tstr: case c3__tshx: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen);
_mint_used();
{
u3_noun sag = u3nt(u3nt(u3nc(u3k(p_gen), u3k(q_gen)), u3_nul, u3_nul),
u3_nul,
u3_nul);
u3_noun boc = u3qf_face(sag, sut);
u3_noun ret = _mint_in(van, boc, gol, r_gen);
u3z(sag);
u3z(boc);
return ret;
}
case c3__tshx: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen);
_mint_used(); _mint_used();
{ {
u3_noun boc = u3qfu_buss(van, sut, p_gen, q_gen); u3_noun boc = u3qfu_buss(van, sut, p_gen, q_gen);

18
jets/f/ut_mull.c
View File

@ -602,23 +602,7 @@
u3z(lem); u3z(lem);
return ret; return ret;
} }
case c3__tstr: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen); case c3__tstr: case c3__tshx: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen);
_mull_used();
{
u3_noun sag = u3nt(u3nt(u3nc(u3k(p_gen), u3k(q_gen)), u3_nul, u3_nul),
u3_nul,
u3_nul);
u3_noun boc = u3qf_face(sag, sut);
u3_noun nuf = u3qf_face(sag, dox);
u3_noun ret = _mull_in(van, boc, gol, nuf, r_gen);
u3z(sag);
u3z(boc);
u3z(nuf);
return ret;
}
case c3__tshx: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen);
_mull_used(); _mull_used();
{ {
u3_noun boc = u3qfu_buss(van, sut, p_gen, q_gen); u3_noun boc = u3qfu_buss(van, sut, p_gen, q_gen);

16
jets/f/ut_play.c
View File

@ -353,21 +353,7 @@
u3z(boc); u3z(boc);
return ret; return ret;
} }
case c3__tstr: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen); case c3__tstr: case c3__tshx: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen);
_play_used();
{
u3_noun sag = u3nt(u3nt(u3nc(u3k(p_gen), u3k(q_gen)), u3_nul, u3_nul),
u3_nul,
u3_nul);
u3_noun boc = u3qf_face(sag, sut);
u3_noun ret = _play_x(van, boc, r_gen);
u3z(sag);
u3z(boc);
return ret;
}
case c3__tshx: u3x_trel(u3t(gen), &p_gen, &q_gen, &r_gen);
_play_used(); _play_used();
{ {
u3_noun boc = u3qfu_buss(van, sut, p_gen, q_gen); u3_noun boc = u3qfu_buss(van, sut, p_gen, q_gen);