Comparison

util.array: Take advantage of table.move()

comparison

equal deleted inserted replaced

-:8deb401a21f6
+:42b2713ab818
 -- COPYING file in the source package for more information.
 --
 local t_insert, t_sort, t_remove, t_concat
 = table.insert, table.sort, table.remove, table.concat;
+local t_move = require "util.table".move;
 local setmetatable = setmetatable;
 local getmetatable = getmetatable;
 local math_random = math.random;
 local math_floor = math.floor;
 			outa[idx] = nil;
 		end
 		return outa;
 	end
-	for idx = 1, 1+j-i do
-		outa[idx] = ina[i+(idx-1)];
+	t_move(ina, i, j, 1, outa);
-	end
 	if ina == outa then
-		for idx = 2+j-i, #outa do
+		-- Clear (nil) remainder of range
-			outa[idx] = nil;
+		t_move(ina, #outa+1, #outa*2, 2+j-i, ina);
-		end
 	end
 	return outa;
 end
 function array_base.sort(outa, ina, ...)
 	end
 	return self;
 end
 function array_methods:append(ina)
-	local len, len2 = #self, #ina;
+	t_move(ina, 1, #ina, #self+1, self);
-	for i = 1, len2 do
-		self[len+i] = ina[i];
-	end
 	return self;
 end
 function array_methods:push(x)
 	t_insert(self, x);