def test_simple
root = NamedNode.new(:n => "root", :children => [
NamedNode.new(:n => "a", :children => [
NamedNode.new(:n => "a1")
]),
UnnamedNode.new(:children => [
NamedNode.new(:n => "b1")
])
])
qnp = RGen::Serializer::QualifiedNameProvider.new(:attribute_name => "n")
assert_equal "/root", qnp.identifier(root)
assert_equal "/root/a", qnp.identifier(root.children[0])
assert_equal "/root/a/a1", qnp.identifier(root.children[0].children[0])
assert_equal "/root", qnp.identifier(root.children[1])
assert_equal "/root/b1", qnp.identifier(root.children[1].children[0])
end