[Tarantool-patches] [PATCH v2 luajit 40/45] test: remove <misc/uclo.lua> LuaJIT test

Sergey Bronnikov sergeyb at tarantool.org
Thu Aug 22 17:43:54 MSK 2024


Sergey,

On 21.08.2024 11:58, Sergey Kaplun wrote:
> This patch removes the aforementioned test since it is part of the
> <lang/upvalue/closure.lua> test.
>
> Part of tarantool/tarantool#9398
> ---
thanks for the patch! LGTM
>   test/LuaJIT-tests/misc/uclo.lua | 91 ---------------------------------
>   1 file changed, 91 deletions(-)
>   delete mode 100644 test/LuaJIT-tests/misc/uclo.lua
>
> diff --git a/test/LuaJIT-tests/misc/uclo.lua b/test/LuaJIT-tests/misc/uclo.lua
> deleted file mode 100644
> index bd9bd242..00000000
> --- a/test/LuaJIT-tests/misc/uclo.lua
> +++ /dev/null
> @@ -1,91 +0,0 @@
> -
> -local function test_for()
> -  local z1, z2
> -  for i=1,10 do
> -    local function f() return i end
> -    if z1 then z2 = f else z1 = f end
> -  end
> -  assert(z1() == 1)
> -  assert(z2() == 10)
> -end
> -
> -local function test_while()
> -  local z1, z2
> -  local i = 1
> -  while i <= 10 do
> -    local j = i
> -    local function f() return j end
> -    if z1 then z2 = f else z1 = f end
> -    i = i + 1
> -  end
> -  assert(z1() == 1)
> -  assert(z2() == 10)
> -end
> -
> -local function test_repeat()
> -  local z1, z2
> -  local i = 1
> -  repeat
> -    local j = i
> -    local function f() return j end
> -    if z1 then z2 = f else z1 = f end
> -    i = i + 1
> -  until i > 10
> -  assert(z1() == 1)
> -  assert(z2() == 10)
> -end
> -
> -local function test_func()
> -  local function ff(x)
> -    return function() return x end
> -  end
> -  local z1, z2
> -  for i=1,10 do
> -    local f = ff(i)
> -    if z1 then z2 = f else z1 = f end
> -  end
> -  assert(z1() == 1)
> -  assert(z2() == 10)
> -end
> -
> -test_for()
> -test_while()
> -test_repeat()
> -test_func()
> -
> -do
> -  local function f1(a)
> -    if a > 0 then
> -      local b = f1(a - 1)
> -      return function()
> -	if type(b) == "function" then
> -	  return a + b()
> -	end
> -	return a + b
> -      end
> -    end
> -    return a
> -  end
> -
> -  local function f2(a)
> -    return f1(a)()
> -  end
> -
> -  for i = 1, 41 do
> -    local r = f2(4) + f2(4)
> -  end
> -end
> -
> --- Don't mark upvalue as immutable if written to after prototype definition.
> -do
> -  local x = 1
> -  local function f()
> -    local y = 0
> -    for i=1,100 do y=y+x end
> -    return y
> -  end
> -  assert(f() == 100)
> -  x = 2
> -  assert(f() == 200)
> -end
> -
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.tarantool.org/pipermail/tarantool-patches/attachments/20240822/344a73bc/attachment.htm>


More information about the Tarantool-patches mailing list