int vasprintf()

in tcl_misc.c [66:81]


int vasprintf(char **result, const char *format, va_list args)
{
	char p;
	int ret;
	
	ret = vsnprintf(&p, 1, format, args);
	
	if (ret > 0) {
		*result = malloc(ret + 1);
		return vsprintf(*result, format, args);
	}
	
	*result = NULL;
	
	return ret;
}