X-Git-Url: https://git.dlugolecki.net.pl/?a=blobdiff_plain;f=gedcom%2Fcompat.c;h=2cbf8185ff1ee9b8a7af3eed288a1b5e99da789c;hb=1a9abc06dc9e29dfcd6c7a00e36b05193dc464d9;hp=3997fe695278d589e838a7f0e470125339b20f78;hpb=d2dbc2834cae06a5de0dec22c0e7a530b7dd1589;p=gedcom-parse.git

diff --git a/gedcom/compat.c b/gedcom/compat.c
index 3997fe6..2cbf818 100644
--- a/gedcom/compat.c
+++ b/gedcom/compat.c
@@ -269,6 +269,12 @@ int compat_mode(Compat_rule rule)
   return (compat_matrix[rule] & compatibility);
 }
 
+void compat_close()
+{
+  compatibility_program = 0;
+  compatibility = 0;
+}
+
 /********************************************************************/
 /*  C_NO_SUBMITTER                                                  */
 /********************************************************************/