- SAFE_FREE(fam->xrefstr);
- DESTROY_CHAIN_ELTS(event, fam->event, event_cleanup)
- DESTROY_CHAIN_ELTS(xref_list, fam->children, NULL_DESTROY)
- SAFE_FREE(fam->nr_of_children);
- DESTROY_CHAIN_ELTS(xref_list, fam->submitters, NULL_DESTROY)
- DESTROY_CHAIN_ELTS(lds_event, fam->lds_spouse_sealing, lds_event_cleanup)
- DESTROY_CHAIN_ELTS(source_citation, fam->citation, citation_cleanup)
- DESTROY_CHAIN_ELTS(multimedia_link, fam->mm_link, multimedia_link_cleanup)
- DESTROY_CHAIN_ELTS(note_sub, fam->note, note_sub_cleanup)
- DESTROY_CHAIN_ELTS(user_ref_number, fam->ref, user_ref_cleanup)
- SAFE_FREE(fam->record_id);
- change_date_cleanup(fam->change_date);
- DESTROY_CHAIN_ELTS(user_data, fam->extra, user_data_cleanup)
+ if (fam) {
+ SAFE_FREE(fam->xrefstr);
+ DESTROY_CHAIN_ELTS(event, fam->event, event_cleanup);
+ DESTROY_CHAIN_ELTS(xref_list, fam->children, NULL_DESTROY);
+ SAFE_FREE(fam->nr_of_children);
+ DESTROY_CHAIN_ELTS(xref_list, fam->submitters, NULL_DESTROY);
+ DESTROY_CHAIN_ELTS(lds_event, fam->lds_spouse_sealing, lds_event_cleanup);
+ DESTROY_CHAIN_ELTS(source_citation, fam->citation, citation_cleanup);
+ DESTROY_CHAIN_ELTS(multimedia_link, fam->mm_link, multimedia_link_cleanup);
+ DESTROY_CHAIN_ELTS(note_sub, fam->note, note_sub_cleanup);
+ DESTROY_CHAIN_ELTS(user_ref_number, fam->ref, user_ref_cleanup);
+ SAFE_FREE(fam->record_id);
+ change_date_cleanup(fam->change_date);
+ DESTROY_CHAIN_ELTS(user_data, fam->extra, user_data_cleanup);
+ }