Posted to tcl by evilotto at Wed Nov 05 19:27:42 GMT 2014view pretty
package require tdom proc ::dom::xpathFunc::crash {args} {return x} dom parse {<a/>} doc $doc selectNodes crash(//x)
package require tdom proc ::dom::xpathFunc::crash {args} {return x} dom parse {<a/>} doc $doc selectNodes crash(//x)