Property definitions

dom $ XMLStartTag :: defaultinit
# A (potentially) multi-line spanning XML Tag start
class XMLStartTag
	super XMLAttrTag

	# Optional matching tag, must be matched for the document to be well-formed
	var matching: nullable XMLEndTag

	redef fun to_s do
		var s = "<{tag_name}"
		if not attributes.is_empty then
			s += " "
			s += attributes.join(" ")
		end
		s += ">"
		for i in children do s += i.to_s
		var matching = self.matching
		if matching != null then s += matching.to_s
		return s
	end
end
lib/dom/xml_entities.nit:188,1--207,3