New %hold now firmly in place.

This commit is contained in:
C. Guy Yarvin 2016-01-10 23:04:34 -08:00
parent 2cb759d86d
commit e529506426
8 changed files with 4 additions and 14 deletions

View File

@ -55,7 +55,6 @@
return _burn_in(van, u3h(p_sut), gil);
}
case c3__hold:
case c3__holt:
{
if ( (c3y == u3qdi_has(gil, sut)) ) {
u3_noun sux = u3qfu_dunq(van, "type", sut);

View File

@ -155,7 +155,6 @@
return u3kf_frog(_crop_dext_frog(van, p_sut, ref, bix));
}
case c3__hold:
case c3__holt:
{
u3_noun hud = u3nc(u3k(sut), u3k(ref));
@ -210,7 +209,6 @@
return _crop_sint_frog(van, sut, p_ref, bix);
}
case c3__hold:
case c3__holt:
{
u3_noun rep = u3qfu_repo(van, ref);
u3_noun ret = _crop_dext(van, sut, rep, bix);

View File

@ -118,8 +118,7 @@
p_sut = u3t(sut);
return _fish_frog(van, p_sut, axe, vit);
}
case c3__hold:
case c3__holt: {
case c3__hold: {
p_sut = u3t(sut);
{
if ( (c3y == u3qdi_has(vit, sut)) ) {

View File

@ -137,7 +137,6 @@
return u3kf_frog(_fuse_in_frog(van, p_sut, ref, bix));
}
case c3__hold:
case c3__holt:
{
u3_noun hud = u3nc(u3k(sut), u3k(ref));

View File

@ -280,7 +280,6 @@
return c3n;
}
case c3__hold:
case c3__holt:
{
if ( c3y == u3qdi_has(seg, sut) ) {
return c3n;
@ -417,8 +416,7 @@
}
return c3y;
}
case c3__hold:
case c3__holt: {
case c3__hold: {
if ( c3y == u3qdi_has(reg, ref) ) {
return c3y;
}

View File

@ -117,8 +117,7 @@
return u3kf_frog(_peek_frog(van, p_sut, way, axe, gil));
}
case c3__hold:
case c3__holt: {
case c3__hold: {
if ( (c3y == u3qdi_has(gil, sut)) ) {
return c3__void;
}

View File

@ -40,8 +40,7 @@
return u3k(q_sut);
}
}
case c3__hold:
case c3__holt: {
case c3__hold: {
if ( c3n == u3r_cell(u3t(sut), &p_sut, &q_sut)) {
return u3m_bail(c3__fail);
} else {

View File

@ -53,7 +53,6 @@
return u3kf_frog(_wrap_frog(van, p_sut, yoz));
}
case c3__hold:
case c3__holt:
{
u3_noun fop = u3qfu_repo(van, sut);
u3_noun pro = _cqfu_wrap(van, fop, yoz);