• file
• latest
• revisions
• annotate
• diff
• comparison
• raw

tests/test_util_jid.lua@338e75cba18d (annotated)

tests/test_util_jid.lua

Wed, 08 Oct 2008 19:17:14 +0300

author

Paul-Sebastian Manole <brokenthorn@gmail.com>

date

Wed, 08 Oct 2008 19:17:14 +0300

changeset 75

338e75cba18d

parent 28

4a238233f278

child 239

6f4e9911c7d1

permissions

-rw-r--r--

Added script to pull from master mercurial repository
Added a few name suggestions to doc/names.txt
Minor edits.

28 4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	1
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	2	function split(split)
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	3	function test(jid, node, server, resource)
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	4	local rnode, rserver, rresource = split(jid);
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	5	assert_equal(node, rnode, "split("..jid..") failed");
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	6	assert_equal(server, rserver, "split("..jid..") failed");
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	7	assert_equal(resource, rresource, "split("..jid..") failed");
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	8	end
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	9	test("node@server", "node", "server", nil );
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	10	test("node@server/resource", "node", "server", "resource" );
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	11	test("server", nil, "server", nil );
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	12	test("server/resource", nil, "server", "resource" );
4a238233f278 Adding initial unit testing scripts Matthew Wild <mwild1@gmail.com> parents: diff changeset	13	end