X-Git-Url: https://git.dlugolecki.net.pl/?a=blobdiff_plain;f=gedcom%2Fmultilex.c;h=75563117c55f8f51f6bbd151491f5e31a40cf1af;hb=7cbefaec45b82eb0449465da19d38a89f2ff2cf3;hp=5b0aa4eec262861c492e5745115b7bbcd957ddb2;hpb=92e0840a09f9226d81a22aae95aa7f7d10f3d316;p=gedcom-parse.git

diff --git a/gedcom/multilex.c b/gedcom/multilex.c
index 5b0aa4e..7556311 100644
--- a/gedcom/multilex.c
+++ b/gedcom/multilex.c
@@ -215,3 +215,19 @@ int gedcom_new_model()
   }
   return result;
 }
+
+int gedcom_check_version(int major, int minor, int patch)
+{
+  if (major < GEDCOM_PARSE_VERSION_MAJOR)
+    return 1;
+  else if (major > GEDCOM_PARSE_VERSION_MAJOR)
+    return 0;
+  else if (minor < GEDCOM_PARSE_VERSION_MINOR)
+    return 1;
+  else if (minor > GEDCOM_PARSE_VERSION_MINOR)
+    return 0;
+  else if (patch <= GEDCOM_PARSE_VERSION_PATCH)
+    return 1;
+  else {
+    return 0;
+}