mirror of https://github.com/bjc/prosody
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
74 lines
1.8 KiB
74 lines
1.8 KiB
|
|
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
|
|
|