static size_t
fill_addrinfo(void **buffer)
{
  for (count = 0; count < limit; ++count)
    {

      /* *INDENT-EQLS* */
      actual->ai_flags    = phost->ai_flags;
      actual->ai_family   = phost->ai_family;
      actual->ai_socktype = phost->ai_socktype;
      actual->ai_protocol = phost->ai_protocol;
      actual->ai_addrlen  = phost->ai_addrlen;
      actual->ai_addr     = (struct sockaddr *)(void *)heap;

    }
  return (size_t)(heap - (char *)result);
}

void
failed(mode_t * _t)
{
  /* *INDENT-EQLS* */
  parser_state_tos->next                = 0;
  parser_state_tos->tos                 = 0;
  parser_state_tos->paren_indents_size  = 1;
  parser_state_tos->p_stack[0]          = stmt;

  parser_state_tos->last_nl = true;
  perror(_t);
  exit(BADEXIT);
}
