function luaK.setlist(L,n,M,h,P)local V=math.floor((h-1)/luaP.LFIELDS_PER_FLUSH)+1 local f=P==luaY.LUA_MULTRET and 0 or P assert(P~=0)if V<=luaP.MAXARG_C then L:codeABC(n,"\079\080\095\083\069\084\076\073\083\084",M,f,V)else L:codeABC(n,"\079\080\095\083\069\084\076\073\083\084",M,f,0)L:code(n,luaP:CREATE_Inst(V),n.ls.lastline)end n.freereg=M+1 end return function(n)luaY=n return luaK end

function luaK:setlist(fs, base, nelems, tostore)
  local c = math.floor((nelems - 1)/luaP.LFIELDS_PER_FLUSH) + 1
  local b = (tostore == luaY.LUA_MULTRET) and 0 or tostore
  assert(tostore ~= 0)
  if c <= luaP.MAXARG_C then
    self:codeABC(fs, "OP_SETLIST", base, b, c)
  else
    self:codeABC(fs, "OP_SETLIST", base, b, 0)
    self:code(fs, luaP:CREATE_Inst(c), fs.ls.lastline)
  end
  fs.freereg = base + 1  -- free registers with list values
end

return function(a) luaY = a return luaK end
