aboutsummaryrefslogtreecommitdiff
path: root/testes/gc.lua
diff options
context:
space:
mode:
Diffstat (limited to 'testes/gc.lua')
-rw-r--r--testes/gc.lua14
1 files changed, 8 insertions, 6 deletions
diff --git a/testes/gc.lua b/testes/gc.lua
index c26de406..5b39bac1 100644
--- a/testes/gc.lua
+++ b/testes/gc.lua
@@ -28,19 +28,21 @@ end
28-- test weird parameters to 'collectgarbage' 28-- test weird parameters to 'collectgarbage'
29do 29do
30 collectgarbage("incremental") 30 collectgarbage("incremental")
31 local opause = collectgarbage("setparam", "pause", 100) 31 local opause = collectgarbage("param", "pause", 100)
32 local ostepmul = collectgarbage("setparam", "stepmul", 100) 32 local ostepmul = collectgarbage("param", "stepmul", 100)
33 assert(collectgarbage("param", "pause") == 100)
34 assert(collectgarbage("param", "stepmul") == 100)
33 local t = {0, 2, 10, 90, 500, 5000, 30000, 0x7ffffffe} 35 local t = {0, 2, 10, 90, 500, 5000, 30000, 0x7ffffffe}
34 for i = 1, #t do 36 for i = 1, #t do
35 collectgarbage("setparam", "pause", t[i]) 37 collectgarbage("param", "pause", t[i])
36 for j = 1, #t do 38 for j = 1, #t do
37 collectgarbage("setparam", "stepmul", t[j]) 39 collectgarbage("param", "stepmul", t[j])
38 collectgarbage("step", t[j]) 40 collectgarbage("step", t[j])
39 end 41 end
40 end 42 end
41 -- restore original parameters 43 -- restore original parameters
42 collectgarbage("setparam", "pause", opause) 44 collectgarbage("param", "pause", opause)
43 collectgarbage("setparam", "stepmul", ostepmul) 45 collectgarbage("param", "stepmul", ostepmul)
44 collectgarbage() 46 collectgarbage()
45end 47end
46 48