make_reply(xbuf, buff, index); remove_list_tail(buff, index);
ei_x_encode_list_header(xbuf, 1); if ( ! make_reply(xbuf, buff, index) ) break;
static void make_reply_list(ei_x_buff *xbuf, char *buff, int *index) {    gint arity, i;  if ( ! ((arity = gn_get_list(xbuf, buff, index)) > -1) )    return;    gn_wrap_ans("reply",xbuf);  ei_x_encode_list_header(xbuf, arity);  for (i = 0; i < arity; i++) {    make_reply(xbuf, buff, index);    remove_list_tail(buff, index);  }  ei_x_encode_empty_list(xbuf);}