free(place);
}
else {
- switch (ctxt->ctxt_type) {
+ int type = ctxt_type(ctxt);
+ switch (type) {
case ELT_SUB_FAM_EVT:
case ELT_SUB_FAM_EVT_EVEN:
case ELT_SUB_INDIV_ATTR:
case ELT_SUB_INDIV_EVEN:
ADDFUNC2_NOLIST(event,place)(ctxt, place); break;
default:
- UNEXPECTED_CONTEXT(ctxt->ctxt_type);
+ UNEXPECTED_CONTEXT(type);
}
result = MAKE_GOM_CTXT(elt, place, place);
}
}
DEFINE_SUB_MAKEFUNC(place)
-DEFINE_SUB_ADDFUNC(place)
+DEFINE_SUB_SETFUNC(place)
DEFINE_SUB_DELETEFUNC(place)
DEFINE_STRING_CB(place, sub_place_form_start, place_hierarchy)
sub_place_form_start, def_elt_end);
}
+void UNREFALLFUNC(place)(struct place* obj)
+{
+ if (obj) {
+ UNREFALLFUNC(source_citation)(obj->citation);
+ UNREFALLFUNC(note_sub)(obj->note);
+ UNREFALLFUNC(user_data)(obj->extra);
+ }
+}
+
void CLEANFUNC(place)(struct place* place)
{
if (place) {