Ignore extra args in table.extend(t1, t2) calls

Author: HaroldCindy

VM/src/ltablib.cpp

@@ -263,10 +263,14 @@ static int tappend(lua_State* L)
 // so it makes sense to provide as a first-class member of the stdlib.
 static int textend(lua_State* L)
 {
-    lua_checkstack(L, 6);
-
     luaL_checktype(L, 1, LUA_TTABLE);
     luaL_checktype(L, 2, LUA_TTABLE);
+
+    // ignore further arguments
+    lua_settop(L, 2);
+
+    lua_checkstack(L, 6);
+
     int dn = lua_objlen(L, 1);
     int sn = lua_objlen(L, 2);
 

tests/conformance/tables.luau

@@ -860,6 +860,11 @@ do
   -- Returns destination table
   local t6 = {1, 2}
   assert(table.extend(t6, {3, 4}) == t6)
+
+  -- Extra args ignored
+  local t7 = {1, 2}
+  assert(table.extend(t7, {3,4}, {5,6}, {7,8}) == t7)
+  assert(table.concat(t7, ',') == "1,2,3,4")
 end
 
-return"OK"
+return "OK"