# portable version of 2-argument asorti for using with glibc build script 'sysd-rules.awk' on one true awk

function _asorti_2(src,dst)
{
	num = 1;
	max = 0;

	for (srcnum in src)
		if (max < srcnum) max = srcnum;

	for (srcnum = 0; srcnum <= max; srcnum++)
	{
		if (src[srcnum] != NULL)
		{
			dst[num] = srcnum;
			num++;
		}
	}
	return num;
}