ntoa_get_size(number)
{
	local size = 0;
	
	if (number == 0)
		size++;
	loop 
	{
		if (number == 0)
			return (size);
		number = number / 10;
		size++;
	}
}

ntoa(number)
{
	local str;
	local size;

	size = ntoa_get_size(number);
	str = galloc(size + 1);
	if (str == 0)
		return (0);
	[str + size] = 0;
	if (number == 0)
		[str] = '0';
	loop
	{
		if (number == 0)
			return (str);
		[str + size - 1] = number % 10 + '0';
		number = number / 10;
		size--;
	}
}