X-Git-Url: https://git.dlugolecki.net.pl/?a=blobdiff_plain;f=gedcom%2Finterface.h;h=7e4474860211c3e00cdd381c82fdaae80ff68dc8;hb=35f77ce6bd3ccc27047eda0b3ef8d74c7a86c3d7;hp=7b73dbfdc08d676c31d88e60f5acf30aa0467079;hpb=40ff55f97de314e09359361d83f7eacd47fa3bce;p=gedcom-parse.git

diff --git a/gedcom/interface.h b/gedcom/interface.h
index 7b73dbf..7e44748 100644
--- a/gedcom/interface.h
+++ b/gedcom/interface.h
@@ -35,5 +35,16 @@ Gedcom_ctxt start_element(Gedcom_elt elt, Gedcom_ctxt parent,
 void        end_element(Gedcom_elt elt, Gedcom_ctxt parent, Gedcom_ctxt self,
 			Gedcom_val parsed_value);
 
+extern Gedcom_val_struct val;
+
+#define GEDCOM_MAKE(VALUE, TYPE, MEMBER) \
+   (val.type = TYPE, val.value.MEMBER = VALUE, &val)
+
+#define GEDCOM_MAKE_STRING(STRING) \
+   GEDCOM_MAKE(STRING, GV_CHAR_PTR, string_val)
+
+#define GEDCOM_MAKE_DATE(DATE) \
+   GEDCOM_MAKE(DATE, GV_DATE_VALUE, date_val)
+
 
 #endif /* __INTERFACE_H */