diff options
author | Thomas Harning Jr <harningt@gmail.com> | 2007-09-06 00:05:55 -0400 |
---|---|---|
committer | Thomas Harning Jr <harningt@gmail.com> | 2007-09-06 00:05:55 -0400 |
commit | 64a4223203928443ee5a49dbb7579e1db53a4056 (patch) | |
tree | 8eb5f119e98e57e75186c4b1c4bc7cb23503337b /test | |
parent | 35c12fdb05ee081794f621688bb299a9a63ebf2c (diff) | |
download | luaevent-prosody-64a4223203928443ee5a49dbb7579e1db53a4056.tar.gz luaevent-prosody-64a4223203928443ee5a49dbb7579e1db53a4056.zip |
Added timertest. Prevented GC-ed events from causing an abort.
Diffstat (limited to 'test')
-rw-r--r-- | test/timertest.lua | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/test/timertest.lua b/test/timertest.lua new file mode 100644 index 0000000..ec1257c --- /dev/null +++ b/test/timertest.lua @@ -0,0 +1,19 @@ +require("luaevent.core") + +c = luaevent.core.new() +local f = 100 +local function createEvent() + return c:addevent(nil, luaevent.core.EV_TIMEOUT, function(ev) io.write(".." .. f) f = f - 1 if f < 0 then return -1 end collectgarbage() end, 0.01) +end +ev = createEvent() +print("TESTING Garbage-collect-safe version") +c:loop() +assert(f < 0, "DID NOT FINISH LOOPING") +io.write("\n") +print("TESTING Garbage-collect unsafe version") +f = 100 +createEvent() +c:loop() +assert(f >= 0, "Did not perform expected collection") +io.write("\n") +print("Completed both tests") |