strlen(str) {
	local i;
	i = 0;
	loop {
		if ([str + i] == 0)
			return (i);
		i = i + 1;
	}
}