return function()local Y=game:GetService("\082\101\112\108\105\099\097\116\101\100\083\116\111\114\097\103\101")local j=Y.Packages local D=require(j.Llama)local E=D.Set local T=E.filter it("\115\104\111\117\108\100 \118\097\108\105\100\097\116\101 \116\121\112\101\115",function()local Y={{0};{{};0},{0,function() end}}for j=1,#Y,1 do local D,E=pcall(function()T(unpack(Y[j]))end);(expect(string.find(E,"\101\120\112\101\099\116\101\100\044 \103\111\116"))).to.be.ok()end end)it("\115\104\111\117\108\100 \114\101\116\117\114\110 \097 \110\101\119 \116\097\098\108\101",function()local Y={};(expect(T(Y,function() end))).never.to.equal(Y)end)it("\115\104\111\117\108\100 \110\111\116 \109\117\116\097\116\101 \112\097\115\115\101\100 \105\110 \116\097\098\108\101\115",function()local Y={foo=true,bar=true,baz=true}local j=0 setmetatable(Y,{__newindex=function()j=j+1 end})local function D()return true end T(Y,D);(expect(j)).to.equal(0)end)it("\115\104\111\117\108\100 \099\097\108\108 \116\104\101 \099\097\108\108\098\097\099\107 \102\111\114 \101\097\099\104 \101\108\101\109\101\110\116",function()local Y={foo=true,bar=true;baz=true}local j={}local function D(Y)j[Y]=true return true end T(Y,D)for Y,D in pairs(Y)do(expect(j[Y])).to.equal(D)end for j,D in pairs(j)do(expect(D)).to.equal(Y[j])end end)it("\115\104\111\117\108\100 \099\111\114\114\101\099\116\108\121 \117\115\101 \116\104\101 \102\105\108\116\101\114 \099\097\108\108\098\097\099\107",function()local Y={[1]=true;[2]=true,[3]=true,[4]=true,[5]=true}local function j(Y)return Y%2==0 end local D=T(Y,j);(expect(D[1])).never.to.be.ok();(expect(D[2])).to.be.ok();(expect(D[3])).never.to.be.ok();(expect(D[4])).to.be.ok();(expect(D[5])).never.to.be.ok()end)it("\115\104\111\117\108\100 \099\111\112\121 \116\104\101 \116\097\098\108\101 \099\111\114\114\101\099\116\108\121",function()local Y={foo=true;bar=true,baz=true}local function j()return true end local D=T(Y,j)for Y,j in pairs(Y)do(expect(D[Y])).to.equal(j)end for j,D in pairs(D)do(expect(D)).to.equal(Y[j])end end)it("\115\104\111\117\108\100 \119\111\114\107 \119\105\116\104 \097\110 \101\109\112\116\121 \116\097\098\108\101",function()local Y=false local function j()Y=true return true end local D=T({},j);(expect(next(D))).never.to.be.ok();(expect(Y)).to.equal(false)end)it("\115\104\111\117\108\100 \114\101\109\111\118\101 \097\108\108 \101\108\101\109\101\110\116\115 \102\114\111\109 \103\105\118\101\110 \116\097\098\108\101 \119\104\101\110 \099\097\108\108\098\097\099\107 \114\101\116\117\114\110 \097\108\119\097\121\115 \102\097\108\115\101",function()local Y={foo=true;bar=true,baz=true}local function j()return false end local D=T(Y,j);(expect(next(D))).never.to.be.ok()end)end
return function()
	local ReplicatedStorage = game:GetService("ReplicatedStorage")

	local Packages = ReplicatedStorage.Packages
	local Llama = require(Packages.Llama)

	local Set = Llama.Set
	local filter = Set.filter

	it("should validate types", function()
		local args = {
			{ 0 },
			{ {}, 0 },
			{ 0, function() end }
		}

		for i = 1, #args do
			local _, err = pcall(function()
				filter(unpack(args[i]))
			end)

			expect(string.find(err, "expected, got")).to.be.ok()
		end
	end)

	it("should return a new table", function()
		local a = {}

		expect(filter(a, function() end)).never.to.equal(a)
	end)

	it("should not mutate passed in tables", function()
		local a = {
			foo = true, 
			bar = true, 
			baz = true,
		}
		local mutations = 0

		setmetatable(a, {
			__newindex = function()
				mutations = mutations + 1
			end,
		})

		local function alwaysTrue()
			return true
		end

		filter(a, alwaysTrue)

		expect(mutations).to.equal(0)
	end)

	it("should call the callback for each element", function()
		local a = {
			foo = true, 
			bar = true, 
			baz = true,
		}
		local copy = {}

		local function copyCallback(v)
			copy[v] = true
			return true
		end

		filter(a, copyCallback)

		for k, v in pairs(a) do
			expect(copy[k]).to.equal(v)
		end

		for k, v in pairs(copy) do
			expect(v).to.equal(a[k])
		end
	end)

	it("should correctly use the filter callback", function()
		local a = {
			[1] = true,
			[2] = true,
			[3] = true,
			[4] = true,
			[5] = true,
		}

		local function evenOnly(v)
			return v % 2 == 0
		end

		local b = filter(a, evenOnly)

		expect(b[1]).never.to.be.ok()
		expect(b[2]).to.be.ok()
		expect(b[3]).never.to.be.ok()
		expect(b[4]).to.be.ok()
		expect(b[5]).never.to.be.ok()
	end)

	it("should copy the table correctly", function()
		local a = {
			foo = true, 
			bar = true, 
			baz = true,
		}

		local function keepAll()
			return true
		end

		local b = filter(a, keepAll)

		for k, v in pairs(a) do
			expect(b[k]).to.equal(v)
		end

		for k, v in pairs(b) do
			expect(v).to.equal(a[k])
		end
	end)

	it("should work with an empty table", function()
		local called = false

		local function callback()
			called = true
			return true
		end

		local a = filter({}, callback)

		expect(next(a)).never.to.be.ok()
		expect(called).to.equal(false)
	end)

	it("should remove all elements from given table when callback return always false", function()
		local a = {
			foo = true, 
			bar = true, 
			baz = true,
		}

		local function removeAll()
			return false
		end

		local b = filter(a, removeAll)

		expect(next(b)).never.to.be.ok()
	end)
end