fun = function(context, ...) {
# do things to parse the node
# using the context if necessary.
cat("In XMLParserContextFunction\n")
xmlStopParser(context)
}
fun = xmlParserContextFunction(fun)
txt = ""
# doesn't work for xmlTreeParse()
# xmlTreeParse(txt, handlers = list(a = fun))
# but does in xmlEventParse().
xmlEventParse(txt, handlers = list(startElement = fun), asText = TRUE)
Run the code above in your browser using DataLab