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

diff --git a/gedcom/interface.h b/gedcom/interface.h
index 7b73dbf..2e716c4 100644
--- a/gedcom/interface.h
+++ b/gedcom/interface.h
@@ -26,7 +26,8 @@
 
 #include "gedcom.h"
 
-Gedcom_ctxt start_record(Gedcom_rec rec, int level, char *xref, char *tag);
+Gedcom_ctxt start_record(Gedcom_rec rec,
+			 int level, Gedcom_val xref, char *tag);
 void        end_record(Gedcom_rec rec, Gedcom_ctxt self);
 
 Gedcom_ctxt start_element(Gedcom_elt elt, Gedcom_ctxt parent,
@@ -35,5 +36,24 @@ 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_NULL() \
+   GEDCOM_MAKE(NULL, GV_NULL, string_val)
+
+#define GEDCOM_MAKE_STRING(STRING) \
+   GEDCOM_MAKE(STRING, GV_CHAR_PTR, string_val)
+
+#define GEDCOM_MAKE_NULL_OR_STRING(STRING) \
+   (STRING == NULL ? \
+    GEDCOM_MAKE_NULL() : \
+    GEDCOM_MAKE_STRING(STRING)) \
+
+#define GEDCOM_MAKE_DATE(DATE) \
+   GEDCOM_MAKE(DATE, GV_DATE_VALUE, date_val)
+
 
 #endif /* __INTERFACE_H */