Inline `Array#indexOf`

indexOf.macro.sjs

macro inline_indexOf {
	rule { ($list:expr, $needle:expr) } => {
		(function (ref, needle) {
			var length = ref.length;
			for (var i = 0; i < length; i += 1) {
				if (ref[i] === needle) return i;
			}
			
			return -1;
		}($list, $needle));
	}
}

macro indexOf {
	rule infix { $list:expr . | () } => {
		inline_indexOf($list, undefined)
	}
	rule infix { $list:expr . | ($needle:expr) } => {
		inline_indexOf($list, $needle)
	}
}

export indexOf;