+ if (doc){
+ RecWord recWord;
+ xmlChar *buf_out;
+ int len_out;
+ xmlNodePtr root_ptr;
+
+ (*recctr->init)(recctr, &recWord);
+
+ if (recctr->flagShowRecords){
+ xmlDocDumpMemory(doc, &buf_out, &len_out);
+ fwrite(buf_out, len_out, 1, stdout);
+ xmlFree(buf_out);
+ }
+ root_ptr = xmlDocGetRootElement(doc);
+ if (root_ptr)
+ index_record(tinfo, recctr, root_ptr, &recWord);
+ else
+ yaz_log(YLOG_WARN, "No root for index XML record");
+ }
+}
+
+
+static int convert_extract_doc(struct filter_info *tinfo,
+ struct filter_input *input,
+ struct recExtractCtrl *p,
+ xmlDocPtr doc)
+
+{
+ /* RecWord recWord; */