printf(" -q No output to standard output\n");
}
-Gedcom_ctxt header_start(int level, Gedcom_val xref, char *tag,
+Gedcom_ctxt header_start(Gedcom_rec rec, int level, Gedcom_val xref, char *tag,
char *raw_value, int tag_value,
Gedcom_val parsed_value)
{
return (Gedcom_ctxt)1;
}
-void header_end(Gedcom_ctxt self)
+void header_end(Gedcom_rec rec, Gedcom_ctxt self)
{
output(1, "Header end, context is %d\n", (int)self);
}
return self;
}
+Gedcom_ctxt age_start(Gedcom_elt elt, Gedcom_ctxt parent, int level,
+ char *tag, char *raw_value,
+ int tag_value, Gedcom_val parsed_value)
+{
+ struct age_value age;
+ Gedcom_ctxt self = (Gedcom_ctxt)((int) parent + 1000);
+ age = GEDCOM_AGE(parsed_value);
+ output(1, "Contents of the age_value:\n");
+ output(1, " raw value: %s\n", raw_value);
+ output(1, " type: %d\n", age.type);
+ output(1, " modifier: %d\n", age.mod);
+ output(1, " years: %d\n", age.years);
+ output(1, " months: %d\n", age.months);
+ output(1, " days: %d\n", age.days);
+ output(1, " phrase: %s\n", age.phrase);
+ return self;
+}
+
void default_cb(Gedcom_elt elt, Gedcom_ctxt ctxt, int level, char *tag,
char *raw_value, int tag_value)
{
gedcom_subscribe_to_element(ELT_SOUR_DATA_EVEN_DATE,
date_start, NULL);
gedcom_subscribe_to_element(ELT_SUB_EVT_DATE, date_start, NULL);
+ gedcom_subscribe_to_element(ELT_SUB_FAM_EVT_AGE, age_start, NULL);
}
void gedcom_message_handler(Gedcom_msg_type type, char *msg)
output(0, "\n=== Parsing file %s\n", file_name);
result |= gedcom_parse_file(file_name);
}
- fclose(outfile);
if (result == 0) {
output(1, "Parse succeeded\n");
- return 0;
}
else {
output(1, "Parse failed\n");
- return 1;
- }
+ }
+ fclose(outfile);
+ return result;
}