X-Git-Url: https://git.dlugolecki.net.pl/?a=blobdiff_plain;f=gedcom%2Finterface.h;fp=gedcom%2Finterface.h;h=0c52fc58c3250a313898375dcfeb5e646d1aec50;hb=706c9bfcdfc8d16c3a65243d708af135c2e7c894;hp=7e4474860211c3e00cdd381c82fdaae80ff68dc8;hpb=31a4189cadf24c423013b2ef0874feb8de7c9169;p=gedcom-parse.git

diff --git a/gedcom/interface.h b/gedcom/interface.h
index 7e44748..0c52fc5 100644
--- a/gedcom/interface.h
+++ b/gedcom/interface.h
@@ -40,9 +40,17 @@ 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)