+Gedcom_ctxt rec_start(int level, Gedcom_val xref, char *tag,
+ char *raw_value, int tag_value,
+ Gedcom_val parsed_value)
+{
+ char* xref_str = NULL;
+ if (! GEDCOM_IS_NULL(xref))
+ xref_str = GEDCOM_XREF_PTR(xref)->string;
+ output(1, "Rec %s start, xref is %s\n", tag, xref_str);
+ return (Gedcom_ctxt)tag_value;
+}
+
+Gedcom_ctxt note_start(int level, Gedcom_val xref, char *tag,
+ char *raw_value, int tag_value,
+ Gedcom_val parsed_value)
+{
+ output(1, "== %d %s (%d) %s (xref is %s)\n",
+ level, tag, tag_value, GEDCOM_STRING(parsed_value),
+ GEDCOM_XREF_PTR(xref)->string);
+ return (Gedcom_ctxt)tag_value;
+}
+