test: Add test for behavior if classdef changes between save and load (bug #67414).

* test/classdef-load-save/classdef-load-save.tst: Add test for behavior in
loadobj if the name of a property changed between saving and loading of a
classdef object.
* test/classdef-load-save/loadobj_changed_class.m,
test/classdef-load-save/changed-class/loadobj_changed_class.m: Add new files
for test.
* test/classdef-load-save/module.mk: Add new files to dist tarball.
* test/classdef-load-save/loadobj_class.m (loadobj): Adapt to work with struct
or classdef object input argument.

Author: mmuetzel

test/classdef-load-save/changed-class/loadobj_changed_class.m

@@ -0,0 +1,19 @@
+classdef loadobj_changed_class
+
+    properties
+      a
+      prop_later
+    endproperties
+
+    methods (Static)
+      function obj = loadobj (s)
+        obj = loadobj_changed_class ();
+        if isstruct (s)
+          obj.a = "changed-struct";
+        else
+          obj.a = "changed-object";
+        endif
+      endfunction
+    endmethods
+
+endclassdef

test/classdef-load-save/classdef-load-save.tst

@@ -171,6 +171,32 @@
 %!   delete (savefile);
 %! end_unwind_protect
 
+## No constructor, ConstructOnLoad = false, loadobj is defined, no saveobj
+## Class definition changes between saving and loading the object
+%!test <67414>
+%! obj = loadobj_changed_class ();
+%! obj.a = 0;
+%! savefile = fullfile (tempdir (), "oct-changed-class.sav");
+%! save ('-text', savefile, 'obj');
+%! unwind_protect
+%!   clear obj;
+%!   load (savefile);
+%!   assert (obj.a, "object");
+%!   clear obj;
+%!   ## change to directory with classdef with renamed property name
+%!   cd ("changed-class");
+%!   clear classes;  # includes "clear all"
+%!   savefile = fullfile (tempdir (), "oct-changed-class.sav");
+%!   load (savefile);
+%!   assert (obj.a, "changed-struct");
+%! unwind_protect_cleanup
+%!   delete (savefile);
+%!   [~, curr_dir] = fileparts (pwd ());
+%!   if (strcmp (curr_dir, "changed-class"))
+%!     cd ..
+%!   endif
+%! end_unwind_protect
+
 ## No constructor, ConstructOnLoad = false, loadobj is defined, saveobj is defined
 %!test
 %! obj = loadobj_saveobj_class ();

test/classdef-load-save/loadobj_changed_class.m

@@ -0,0 +1,19 @@
+classdef loadobj_changed_class
+
+    properties
+      a
+      prop_prior
+    endproperties
+
+    methods (Static)
+      function obj = loadobj (s)
+        obj = loadobj_changed_class ();
+        if isstruct (s)
+          obj.a = "struct";
+        else
+          obj.a = "object";
+        endif
+      endfunction
+    endmethods
+
+endclassdef

test/classdef-load-save/loadobj_class.m

@@ -2,13 +2,11 @@
   methods (Static)
     function obj = loadobj (s)
       obj = loadobj_class ();
-      if (isstruct (s))
-        obj.a = s.a;
-        obj.b = s.b;
-        obj.c = s.c;
-        obj.d = s.d;
-        obj.e = s.e;
-      endif
+      obj.a = s.a;
+      obj.b = s.b;
+      obj.c = s.c;
+      obj.d = s.d;
+      obj.e = s.e;
     endfunction
   endmethods
 endclassdef

test/classdef-load-save/module.mk

@@ -1,7 +1,9 @@
 classdef_load_save_TEST_FILES = \
+  %reldir%/changed-class/loadobj_changed_class.m \
   %reldir%/classdef-load-save.tst \
   %reldir%/custom_saveobj.m \
   %reldir%/invalid_saveobj_class.m \
+  %reldir%/loadobj_changed_class.m \
   %reldir%/loadobj_class.m \
   %reldir%/loadobj_saveobj_class.m \
   %reldir%/regular_class.m \