+void enable_compat_msg(const char* program_name, int version)
+{
+ if (version > 0)
+ gedcom_warning(_("Enabling compatibility with '%s', version %d"),
+ program_name, version);
+ else
+ gedcom_warning(_("Enabling compatibility with '%s'"),
+ program_name);
+}
+
+void set_compatibility_program(const char* program)
+{
+ if (compat_enabled) {
+ if (! strncmp(program, "ftree", 6)) {
+ compatibility_program = CP_FTREE;
+ }
+ else if (! strncmp(program, "LIFELINES", 9)) {
+ compatibility_program = CP_LIFELINES;
+ if (strlen(program) > 10 && program[9] = ' ')
+ set_compatibility_version(program + 10);
+ }
+ else if (! strncmp(program, "PAF", 3)) {
+ compatibility_program = CP_PAF;
+ if (strlen(program) > 4 && program[3] = ' ')
+ set_compatibility_version(program + 4);
+ }
+ }
+}
+
+void set_compatibility_version(const char* version)