diff options
Diffstat (limited to 'testes/locals.lua')
-rw-r--r-- | testes/locals.lua | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/testes/locals.lua b/testes/locals.lua index a93839db..2c67edbd 100644 --- a/testes/locals.lua +++ b/testes/locals.lua | |||
@@ -5,6 +5,8 @@ print('testing local variables and environments') | |||
5 | 5 | ||
6 | local debug = require"debug" | 6 | local debug = require"debug" |
7 | 7 | ||
8 | local tracegc = require"tracegc" | ||
9 | |||
8 | 10 | ||
9 | -- bug in 5.1: | 11 | -- bug in 5.1: |
10 | 12 | ||
@@ -554,9 +556,9 @@ do -- test for tbc variable high in the stack | |||
554 | obj[1] = 100 | 556 | obj[1] = 100 |
555 | flag = obj | 557 | flag = obj |
556 | end) | 558 | end) |
557 | collectgarbage("stop") | 559 | tracegc.stop() |
558 | st, obj = xpcall(overflow, errorh, 0) | 560 | st, obj = xpcall(overflow, errorh, 0) |
559 | collectgarbage("restart") | 561 | tracegc.start() |
560 | end) | 562 | end) |
561 | co() | 563 | co() |
562 | assert(not st and obj[1] == 10 and flag[1] == 100) | 564 | assert(not st and obj[1] == 10 and flag[1] == 100) |