- struct multimedia_link *mm = NULL;
-
- if (ctxt) {
- mm = (struct multimedia_link *)malloc(sizeof(struct multimedia_link));
- memset (mm, 0, sizeof(struct multimedia_link));
- if (GEDCOM_IS_XREF_PTR(parsed_value))
- mm->reference = GEDCOM_XREF_PTR(parsed_value);
-
- switch (ctxt->ctxt_type) {
- case ELT_SUB_FAM_EVT:
- case ELT_SUB_FAM_EVT_EVEN:
- case ELT_SUB_INDIV_ATTR:
- case ELT_SUB_INDIV_RESI:
- case ELT_SUB_INDIV_BIRT:
- case ELT_SUB_INDIV_GEN:
- case ELT_SUB_INDIV_ADOP:
- case ELT_SUB_INDIV_EVEN:
- event_add_mm_link(ctxt, mm); break;
- case ELT_SUB_SOUR:
- citation_add_mm_link(ctxt, mm); break;
- case REC_FAM:
- family_add_mm_link(ctxt, mm); break;
- case REC_INDI:
- individual_add_mm_link(ctxt, mm); break;
- case REC_SOUR:
- source_add_mm_link(ctxt, mm); break;
- case REC_SUBM:
- submitter_add_mm_link(ctxt, mm); break;
- default:
- UNEXPECTED_CONTEXT(ctxt->ctxt_type);
+ Gom_ctxt result = NULL;
+
+ if (! ctxt)
+ NO_CONTEXT;
+ else {
+ struct multimedia_link *mm = SUB_MAKEFUNC(multimedia_link)();
+ if (mm) {
+ if (GEDCOM_IS_XREF_PTR(parsed_value))
+ mm->reference = GEDCOM_XREF_PTR(parsed_value);
+
+ switch (ctxt->ctxt_type) {
+ case ELT_SUB_FAM_EVT:
+ case ELT_SUB_FAM_EVT_EVEN:
+ case ELT_SUB_INDIV_ATTR:
+ case ELT_SUB_INDIV_RESI:
+ case ELT_SUB_INDIV_BIRT:
+ case ELT_SUB_INDIV_GEN:
+ case ELT_SUB_INDIV_ADOP:
+ case ELT_SUB_INDIV_EVEN:
+ ADDFUNC2(event,multimedia_link)(ctxt, mm); break;
+ case ELT_SUB_SOUR:
+ ADDFUNC2(source_citation,multimedia_link)(ctxt, mm); break;
+ case REC_FAM:
+ ADDFUNC2(family,multimedia_link)(ctxt, mm); break;
+ case REC_INDI:
+ ADDFUNC2(individual,multimedia_link)(ctxt, mm); break;
+ case REC_SOUR:
+ ADDFUNC2(source,multimedia_link)(ctxt, mm); break;
+ case REC_SUBM:
+ ADDFUNC2(submitter,multimedia_link)(ctxt, mm); break;
+ default:
+ UNEXPECTED_CONTEXT(ctxt->ctxt_type);
+ }
+ result = MAKE_GOM_CTXT(elt, multimedia_link, mm);