a pure-Tcl implementation of a XML parser
