bcfret
*first_compartment = bcfret.first_comp;
*display_size = bcfret.d_len;
new_words_size = bcfret.l_len + bcfret.s_len + bcfret.d_len +
(2 * sizeof (char *)) * bcfret.d_len;
&bcfret.buf[bcfret.string],
&clrdim, bcfret.d_len,
&bcfret.buf[bcfret.lwords], &bcfret.buf[bcfret.swords],
&bcfret.buf[bcfret.dim], 1) != 1) {