Mercurial > prosody-hg

comparison tests/test_core_s2smanager.lua @ 403:da92afa267cf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merging with main branch.
author Tobias Markmann <tm@ayena.de>
date Sun, 23 Nov 2008 20:44:48 +0100
parents a43edbc848b9
children cccd610a0ef9
comparison
equal deleted inserted replaced
402:50f1c09541cd 403:da92afa267cf
1 function compare_srv_priorities(csp)
2 local r1 = { priority = 10, weight = 0 }
3 local r2 = { priority = 100, weight = 0 }
4 local r3 = { priority = 1000, weight = 2 }
5 local r4 = { priority = 1000, weight = 2 }
6 local r5 = { priority = 1000, weight = 5 }
7
8 assert_equal(csp(r1, r1), false);
9 assert_equal(csp(r1, r2), true);
10 assert_equal(csp(r1, r3), true);
11 assert_equal(csp(r1, r4), true);
12 assert_equal(csp(r1, r5), true);
13
14 assert_equal(csp(r2, r1), false);
15 assert_equal(csp(r2, r2), false);
16 assert_equal(csp(r2, r3), true);
17 assert_equal(csp(r2, r4), true);
18 assert_equal(csp(r2, r5), true);
19
20 assert_equal(csp(r3, r1), false);
21 assert_equal(csp(r3, r2), false);
22 assert_equal(csp(r3, r3), false);
23 assert_equal(csp(r3, r4), false);
24 assert_equal(csp(r3, r5), true);
25
26 assert_equal(csp(r4, r1), false);
27 assert_equal(csp(r4, r2), false);
28 assert_equal(csp(r4, r3), false);
29 assert_equal(csp(r4, r4), false);
30 assert_equal(csp(r4, r5), true);
31
32 assert_equal(csp(r5, r1), false);
33 assert_equal(csp(r5, r2), false);
34 assert_equal(csp(r5, r3), false);
35 assert_equal(csp(r5, r4), false);
36 assert_equal(csp(r5, r5), false);
37
38 end