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);
}
