Now ignoring ash/elm in foot.

This commit is contained in:
Curtis Yarvin 2018-05-20 16:07:28 -07:00
parent 5e55e48f3b
commit fde39c38e8
4 changed files with 18 additions and 6 deletions

View File

@ -234,6 +234,17 @@
u3k(qq_sut),
u3k(rq_sut)));
#if 1
if ( qpq_sut == c3__wet ) {
if ( u3h(qqu_zem) != c3__elm ) {
return u3m_error("wet-elm-mismatch");
}
} else if ( qpq_sut == c3__dry ) {
if ( u3h(qqu_zem) != c3__ash) {
return u3m_error("dry-ash-mismatch");
}
} else u3m_bail(c3__fail);
#endif
pro = u3nt
(c3y,
u3nc(u3nc(u3_nul, u3k(axe)), u3k(lon)),

View File

@ -635,12 +635,12 @@
return _mint_cnts(van, sut, gol, p_gen, q_gen);
}
case c3__brcn: p_gen = u3t(gen);
case c3__brcn: u3x_cell(u3t(gen), &p_gen, &q_gen);
_mint_used();
{
u3_noun ruf = u3nc(u3_nul, 1);
ret = _mint_grow(van, sut, gol, c3__gold, u3_nul, c3__dry, ruf, p_gen);
ret = _mint_grow(van, sut, gol, c3__gold, p_gen, c3__dry, ruf, q_gen);
u3z(ruf);
return ret;

View File

@ -70,6 +70,7 @@
u3_noun von = u3i_molt(u3k(van), u3x_sam, u3k(sut), 0);
u3_noun gat = u3j_hook(von, "mile");
// fprintf(stderr, "mile\r\n");
return u3n_kick_on(u3i_molt(gat,
u3x_sam_2,
u3k(dox),
@ -620,13 +621,13 @@
return _mull_cnts(van, sut, gol, dox, p_gen, q_gen);
}
case c3__brcn: p_gen = u3t(gen);
case c3__brcn: u3x_cell(u3t(gen), &p_gen, &q_gen);
_mull_used();
{
u3_noun ruf = u3nc(u3_nul, 1);
ret = _mull_grow
(van, sut, gol, dox, c3__gold, u3_nul, c3__dry, ruf, p_gen);
(van, sut, gol, dox, c3__gold, p_gen, c3__dry, ruf, q_gen);
u3z(ruf);
return ret;

View File

@ -454,12 +454,12 @@
return _play_cnts(van, sut, p_gen, q_gen);
}
case c3__brcn: p_gen = u3t(gen);
case c3__brcn: u3x_cell(u3t(gen), &p_gen, &q_gen);
_play_used();
{
u3_noun ruf = u3nc(u3_nul, 1);
u3_noun ret = _play_grow
(van, sut, c3__gold, u3_nul, c3__dry, ruf, p_gen);
(van, sut, c3__gold, p_gen, c3__dry, ruf, q_gen);
u3z(ruf);
return ret;