File

libs/table.lua @ 506:3610196c5e83 default tip

Merge with Zash.
author Trần H. Trung <xmpp:trần.h.trung@trung.fun>
date Sat, 08 Jul 2023 02:17:52 +0700
parent 483:33d566513eb0
line wrap: on
line source

return {
	pack = function(...) return {n = select("#", ...); ...} end;
	create = function() return {} end;
	move = function (a1, f, e, t, a2)
		a2 = a2 or a1;
		if e >= f then
			local n = (e - f) + 1;
			if t > e or t <= f or a1 ~= a2 then
				for i = 0, n-1 do
					a2[t+i] = a1[f+i];
				end
			else
				for i = n-1, 0, -1 do
					a2[t+i] = a1[f+i];
				end
			end
		end
		return a2;
	end;
}