Scicos tests: fix getfield to mind Annotations and Links 62/17062/1
Paul Bignier [Tue, 7 Jul 2015 10:26:10 +0000 (12:26 +0200)]
Change-Id: I31cd6ef1e3bdf5c4f163eb3ae6d9573edf60869e

scilab/modules/scicos/tests/unit_tests/getfield.dia.ref
scilab/modules/scicos/tests/unit_tests/getfield.tst

index 1781f69..26a90ed 100644 (file)
@@ -28,13 +28,49 @@ b = scicos_block();
 fields = getfield(1, b);
 fieldsRef = ["Block" "graphics" "model" "gui" "doc"];
 assert_checkequal(fields, fieldsRef);
-props = getfield(2, b);
-assert_checkequal(props, b.graphics);
-objs = getfield(3, b);
-assert_checkequal(objs, b.model);
-version = getfield(4, b);
-assert_checkequal(version, b.gui);
-contrib = getfield(5, b);
-assert_checkequal(contrib, b.doc);
+graphics = getfield(2, b);
+assert_checkequal(graphics, b.graphics);
+model = getfield(3, b);
+assert_checkequal(model, b.model);
+gui = getfield(4, b);
+assert_checkequal(gui, b.gui);
+doc = getfield(5, b);
+assert_checkequal(doc, b.doc);
 refMsg = msprintf(_("%s: Wrong value for input argument #%d: At most %d expected.\n"), "getfield", 1, 5);
 assert_checkerror("getfield(6, b)", refMsg);
+// Annotation
+t = TEXT_f("define");
+fields = getfield(1, t);
+fieldsRef = ["Text" "graphics" "model" "void" "gui"];
+assert_checkequal(fields, fieldsRef);
+graphics = getfield(2, t);
+assert_checkequal(graphics, t.graphics);
+model = getfield(3, t);
+assert_checkequal(model, t.model);
+void = getfield(4, t);
+assert_checkequal(void, t.void);
+gui = getfield(5, t);
+assert_checkequal(gui, t.gui);
+refMsg = msprintf(_("%s: Wrong value for input argument #%d: At most %d expected.\n"), "getfield", 1, 5);
+assert_checkerror("getfield(6, t)", refMsg);
+// Link
+l = scicos_link();
+fields = getfield(1, l);
+fieldsRef = ["Link" "xx" "yy" "id" "thick" "ct" "from" "to"];
+assert_checkequal(fields, fieldsRef);
+xx = getfield(2, l);
+assert_checkequal(xx, l.xx);
+yy = getfield(3, l);
+assert_checkequal(yy, l.yy);
+id = getfield(4, l);
+assert_checkequal(id, l.id);
+thick = getfield(5, l);
+assert_checkequal(thick, l.thick);
+ct = getfield(6, l);
+assert_checkequal(ct, l.ct);
+from = getfield(7, l);
+assert_checkequal(from, l.from);
+to = getfield(8, l);
+assert_checkequal(to, l.to);
+refMsg = msprintf(_("%s: Wrong value for input argument #%d: At most %d expected.\n"), "getfield", 1, 8);
+assert_checkerror("getfield(9, l)", refMsg);
index 2bf69db..0e88707 100644 (file)
@@ -40,17 +40,72 @@ fields = getfield(1, b);
 fieldsRef = ["Block" "graphics" "model" "gui" "doc"];
 assert_checkequal(fields, fieldsRef);
 
-props = getfield(2, b);
-assert_checkequal(props, b.graphics);
+graphics = getfield(2, b);
+assert_checkequal(graphics, b.graphics);
 
-objs = getfield(3, b);
-assert_checkequal(objs, b.model);
+model = getfield(3, b);
+assert_checkequal(model, b.model);
 
-version = getfield(4, b);
-assert_checkequal(version, b.gui);
+gui = getfield(4, b);
+assert_checkequal(gui, b.gui);
 
-contrib = getfield(5, b);
-assert_checkequal(contrib, b.doc);
+doc = getfield(5, b);
+assert_checkequal(doc, b.doc);
 
 refMsg = msprintf(_("%s: Wrong value for input argument #%d: At most %d expected.\n"), "getfield", 1, 5);
 assert_checkerror("getfield(6, b)", refMsg);
+
+
+// Annotation
+t = TEXT_f("define");
+
+fields = getfield(1, t);
+fieldsRef = ["Text" "graphics" "model" "void" "gui"];
+assert_checkequal(fields, fieldsRef);
+
+graphics = getfield(2, t);
+assert_checkequal(graphics, t.graphics);
+
+model = getfield(3, t);
+assert_checkequal(model, t.model);
+
+void = getfield(4, t);
+assert_checkequal(void, t.void);
+
+gui = getfield(5, t);
+assert_checkequal(gui, t.gui);
+
+refMsg = msprintf(_("%s: Wrong value for input argument #%d: At most %d expected.\n"), "getfield", 1, 5);
+assert_checkerror("getfield(6, t)", refMsg);
+
+
+// Link
+l = scicos_link();
+
+fields = getfield(1, l);
+fieldsRef = ["Link" "xx" "yy" "id" "thick" "ct" "from" "to"];
+assert_checkequal(fields, fieldsRef);
+
+xx = getfield(2, l);
+assert_checkequal(xx, l.xx);
+
+yy = getfield(3, l);
+assert_checkequal(yy, l.yy);
+
+id = getfield(4, l);
+assert_checkequal(id, l.id);
+
+thick = getfield(5, l);
+assert_checkequal(thick, l.thick);
+
+ct = getfield(6, l);
+assert_checkequal(ct, l.ct);
+
+from = getfield(7, l);
+assert_checkequal(from, l.from);
+
+to = getfield(8, l);
+assert_checkequal(to, l.to);
+
+refMsg = msprintf(_("%s: Wrong value for input argument #%d: At most %d expected.\n"), "getfield", 1, 8);
+assert_checkerror("getfield(9, l)", refMsg);