Mercurial > prosody-hg
view tests/test_util_queue.lua @ 8706:e2919978673e
net.http: Fix parameter order to http request callbacks
Commit e3b9dc9dd940 changed the parameter order in 2013, but did not update the names of the parameters in the callback function. Due to this inconsistency, 12df41a5a4b1 accidentally reversed the order when fixing the variable names without fixing where they are used.
Additionally the documentation was incorrect (since 2013), and this has also now been fixed.
| author | Matthew Wild <mwild1@gmail.com> |
|---|---|
| date | Wed, 04 Apr 2018 18:27:44 +0100 |
| parents | d4bd036e679b |
| children |
line wrap: on
line source
function new(new) do local q = new(10); assert_equal(q.size, 10); assert_equal(q:count(), 0); assert_is(q:push("one")); assert_is(q:push("two")); assert_is(q:push("three")); for i = 4, 10 do assert_is(q:push("hello")); assert_equal(q:count(), i, "count is not "..i.."("..q:count()..")"); end assert_equal(q:push("hello"), nil, "queue overfull!"); assert_equal(q:push("hello"), nil, "queue overfull!"); assert_equal(q:pop(), "one", "queue item incorrect"); assert_equal(q:pop(), "two", "queue item incorrect"); assert_is(q:push("hello")); assert_is(q:push("hello")); assert_equal(q:pop(), "three", "queue item incorrect"); assert_is(q:push("hello")); assert_equal(q:push("hello"), nil, "queue overfull!"); assert_equal(q:push("hello"), nil, "queue overfull!"); assert_equal(q:count(), 10, "queue count incorrect"); for _ = 1, 10 do assert_equal(q:pop(), "hello", "queue item incorrect"); end assert_equal(q:count(), 0, "queue count incorrect"); assert_is(q:push(1)); for i = 1, 1001 do assert_equal(q:pop(), i); assert_equal(q:count(), 0); assert_is(q:push(i+1)); assert_equal(q:count(), 1); end assert_equal(q:pop(), 1002); assert_is(q:push(1)); for i = 1, 1000 do assert_equal(q:pop(), i); assert_is(q:push(i+1)); end assert_equal(q:pop(), 1001); assert_equal(q:count(), 0); end do -- Test queues that purge old items when pushing to a full queue local q = new(10, true); for i = 1, 10 do q:push(i); end assert_equal(q:count(), 10); assert_is(q:push(11)); assert_equal(q:count(), 10); assert_equal(q:pop(), 2); -- First item should have been purged for i = 12, 32 do assert_is(q:push(i)); end assert_equal(q:count(), 10); assert_equal(q:pop(), 23); end end
