diff options
Diffstat (limited to '')
-rw-r--r-- | testes/gc.lua | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/testes/gc.lua b/testes/gc.lua index 3c928d7c..4cf7d556 100644 --- a/testes/gc.lua +++ b/testes/gc.lua | |||
@@ -27,23 +27,18 @@ end | |||
27 | 27 | ||
28 | -- test weird parameters to 'collectgarbage' | 28 | -- test weird parameters to 'collectgarbage' |
29 | do | 29 | do |
30 | -- save original parameters | ||
31 | local a = collectgarbage("setpause", 200) | ||
32 | local b = collectgarbage("setstepmul", 200) | ||
33 | local t = {0, 2, 10, 90, 500, 5000, 30000, 0x7ffffffe} | 30 | local t = {0, 2, 10, 90, 500, 5000, 30000, 0x7ffffffe} |
34 | for i = 1, #t do | 31 | for i = 1, #t do |
35 | local p = t[i] | 32 | local p = t[i] |
36 | for j = 1, #t do | 33 | for j = 1, #t do |
37 | local m = t[j] | 34 | local m = t[j] |
38 | collectgarbage("setpause", p) | 35 | collectgarbage("incremental", p, m) |
39 | collectgarbage("setstepmul", m) | ||
40 | collectgarbage("step", 0) | 36 | collectgarbage("step", 0) |
41 | collectgarbage("step", 10000) | 37 | collectgarbage("step", 10000) |
42 | end | 38 | end |
43 | end | 39 | end |
44 | -- restore original parameters | 40 | -- restore original parameters |
45 | collectgarbage("setpause", a) | 41 | collectgarbage("incremental", 200, 300) |
46 | collectgarbage("setstepmul", b) | ||
47 | collectgarbage() | 42 | collectgarbage() |
48 | end | 43 | end |
49 | 44 | ||