- output(1, "Family start, xref is %s\n", GEDCOM_STRING(xref));
- strcpy(family_xreftags[family_nr], GEDCOM_STRING(xref));
+ struct xref_value *xr = GEDCOM_XREF_PTR(xref);
+ output(1, "Family start, xref is %s\n", xr->string);
+ strcpy(family_xreftags[family_nr], xr->string);
+ xr->object = (Gedcom_ctxt)family_nr;