From 5fda30b4f9f82b901113a6e666c797f835c708eb Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Mon, 12 Nov 2018 14:15:50 -0200 Subject: 'lua_toclose' gets the index to be closed as an argument Sometimes it is useful to mark to-be-closed an index that is not at the top of the stack (e.g., if the value to be closed came from a function call returning multiple values). --- testes/api.lua | 18 ++++++++++-------- 1 file changed, 10 insertions(+), 8 deletions(-) (limited to 'testes') diff --git a/testes/api.lua b/testes/api.lua index a6ddca8e..ed857fd0 100644 --- a/testes/api.lua +++ b/testes/api.lua @@ -985,18 +985,20 @@ do return x end - local a = T.testC([[ + local a, b = T.testC([[ call 0 1 # create resource - toclose # mark it to be closed - return 1 + pushint 34 + toclose -2 # mark call result to be closed + toclose -1 # mark number to be closed (will be ignored) + return 2 ]], newresource) - assert(a[1] == 11) + assert(a[1] == 11 and b == 34) assert(#openresource == 0) -- was closed -- repeat the test, but calling function in a 'multret' context local a = {T.testC([[ call 0 1 # create resource - toclose # mark it to be closed + toclose 2 # mark it to be closed return 2 ]], newresource)} assert(type(a[1]) == "string" and a[2][1] == 11) @@ -1005,7 +1007,7 @@ do -- error local a, b = pcall(T.testC, [[ call 0 1 # create resource - toclose # mark it to be closed + toclose -1 # mark it to be closed error # resource is the error object ]], newresource) assert(a == false and b[1] == 11) @@ -1019,10 +1021,10 @@ do local a = T.testC([[ pushvalue 2 call 0 1 # create resource - toclose # mark it to be closed + toclose -1 # mark it to be closed pushvalue 2 call 0 1 # create another resource - toclose # mark it to be closed + toclose -1 # mark it to be closed pushvalue 3 pushint 2 # there should be two open resources call 1 0 -- cgit v1.2.3-55-g6feb