/* u3_term_ef_blit(): send %blit list to specific terminal. */ void u3_term_ef_blit(c3_l tid_l, u3_noun bls) { u3_utty* uty_u = _term_ef_get(tid_l); if ( 0 == uty_u ) { // uL(fprintf(uH, "no terminal %d\n", tid_l)); // uL(fprintf(uH, "uty_u %p\n", u3_Host.uty_u)); u3z(bls); return; } { u3_noun bis = bls; while ( c3y == u3du(bis) ) { _term_ef_blit(uty_u, u3k(u3h(bis))); bis = u3t(bis); } u3z(bls); } }
/* u2_term_ef_blit(): send %blit list to specific terminal. */ void u2_term_ef_blit(c3_l tid_l, u2_noun bls) { u2_utty* uty_u = _term_ef_get(tid_l); if ( 0 == uty_u ) { // uL(fprintf(uH, "no terminal %d\n", tid_l)); // uL(fprintf(uH, "uty_u %p\n", u2_Host.uty_u)); u2z(bls); return; } { u2_noun bis = bls; while ( u2_yes == u2du(bis) ) { _term_ef_blit(uty_u, u2k(u2h(bis))); bis = u2t(bis); } u2z(bls); } }