From 375d009d89eae607b2b95615f42134e4cdd8a2f6 Mon Sep 17 00:00:00 2001 From: mascarenhas Date: Wed, 3 Jun 2009 20:49:18 +0000 Subject: added explicit next and close methods to second return value of lfs.dir (the directory object), for explicit iteration or explicit closing --- tests/test.lua | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) (limited to 'tests') diff --git a/tests/test.lua b/tests/test.lua index 1fd6157..7111074 100644 --- a/tests/test.lua +++ b/tests/test.lua @@ -110,4 +110,21 @@ for i = 1, 4000 do count = count + 1 end end + +-- Stressing directory iterator, explicit version +count = 0 +for i = 1, 4000 do + local iter, dir = lfs.dir(tmp) + local file = dir:next() + while file do + count = count + 1 + file = dir:next() + end + assert(not pcall(dir.next, dir)) +end + +-- directory explicit close +local iter, dir = lfs.dir(tmp) +dir:close() +assert(not pcall(dir.next, dir)) print"Ok!" -- cgit v1.2.3-55-g6feb