+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;
+}
+