Improve the coverage of xml and polynomial tests 60/10360/2
Sylvestre Ledru [Wed, 30 Jan 2013 16:29:32 +0000 (17:29 +0100)]
Thanks to the code coverage.

Change-Id: I787c9da7c6fe0dfac2f0905529022ebbe18c9568

scilab/modules/polynomials/tests/unit_tests/tril.dia.ref [new file with mode: 0644]
scilab/modules/polynomials/tests/unit_tests/tril.tst [new file with mode: 0644]
scilab/modules/xml/tests/unit_tests/xmlAddNs.dia.ref
scilab/modules/xml/tests/unit_tests/xmlAddNs.tst
scilab/modules/xml/tests/unit_tests/xmlRead.dia.ref
scilab/modules/xml/tests/unit_tests/xmlRead.tst

diff --git a/scilab/modules/polynomials/tests/unit_tests/tril.dia.ref b/scilab/modules/polynomials/tests/unit_tests/tril.dia.ref
new file mode 100644 (file)
index 0000000..347b385
--- /dev/null
@@ -0,0 +1,10 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - S/E - Sylvestre Ledru
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- CLI SHELL MODE -->
+s=poly(0,'s');
+a=tril([s,s;s,1]);
+assert_checkequal(a, [s,0*s;s,1]);
diff --git a/scilab/modules/polynomials/tests/unit_tests/tril.tst b/scilab/modules/polynomials/tests/unit_tests/tril.tst
new file mode 100644 (file)
index 0000000..d4e7bf3
--- /dev/null
@@ -0,0 +1,12 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - S/E - Sylvestre Ledru
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- CLI SHELL MODE -->
+s=poly(0,'s');
+a=tril([s,s;s,1]);
+assert_checkequal(a, [s,0*s;s,1]);
+
index b69137f..16f1a96 100644 (file)
@@ -25,12 +25,12 @@ assert_checktrue(tmp.href=="http://gro.balics.www");
 tmp=xmlGetNsByPrefix(doc.root.children(2), "balics");
 assert_checktrue(tmp.prefix=="balics");
 assert_checktrue(tmp.href=="http://gro.balics.www");
-assert_checktrue(grep(xmlDump(doc),"http://www.scilab.")<>[])
- ans  =
-  T  
-assert_checktrue(grep(xmlDump(doc),"http://gro.ba")<>[])
- ans  =
-  T  
+assert_checktrue(grep(xmlDump(doc),"http://www.scilab.")<>[]);
+assert_checktrue(grep(xmlDump(doc),"http://gro.ba")<>[]);
+xmlDelete(doc);
+doc = xmlReadStr("<root><a xmlns:scilab=""http://www.scilab.org""><b>Hello </b><scilab:c>World</scilab:c></a></root>");
+c = doc.root.children(1).children(2);
+a=xmlGetNsByHref(c, "http://www.scilab.org");
+assert_checkequal(a.prefix,"scilab");
+assert_checkequal(a.href,"http://www.scilab.org");
 xmlDelete(doc);
index c8638c6..da51c9a 100644 (file)
@@ -31,7 +31,14 @@ tmp=xmlGetNsByPrefix(doc.root.children(2), "balics");
 assert_checktrue(tmp.prefix=="balics");
 assert_checktrue(tmp.href=="http://gro.balics.www");
 
-assert_checktrue(grep(xmlDump(doc),"http://www.scilab.")<>[])
-assert_checktrue(grep(xmlDump(doc),"http://gro.ba")<>[])
+assert_checktrue(grep(xmlDump(doc),"http://www.scilab.")<>[]);
+assert_checktrue(grep(xmlDump(doc),"http://gro.ba")<>[]);
 
 xmlDelete(doc);
+
+doc = xmlReadStr("<root><a xmlns:scilab=""http://www.scilab.org""><b>Hello </b><scilab:c>World</scilab:c></a></root>");
+c = doc.root.children(1).children(2);
+a=xmlGetNsByHref(c, "http://www.scilab.org");
+assert_checkequal(a.prefix,"scilab");
+assert_checkequal(a.href,"http://www.scilab.org");
+xmlDelete(doc);
\ No newline at end of file
index 83f9db0..84d6b72 100644 (file)
@@ -5,6 +5,9 @@
 //  This file is distributed under the same license as the Scilab package.
 // ===========================================================================
 xmlFile=xmlRead(SCI+"/etc/modules.xml");
+assert_checktrue(xmlIsValidObject(xmlFile));
+a=xmlGetOpenDocs();
+assert_checkequal(a(1).url, SCI+"/etc/modules.xml");
 content=xmlDump(xmlFile);
 assert_checktrue(length(content)>0);
 assert_checktrue(size(content)>=[20,1]);
@@ -13,7 +16,9 @@ xmlDelete(xmlFile);
 msgerr = msprintf(gettext("%s: XML document does not exist.\n"), "xmlDelete");
 assert_checkerror("xmlDelete(xmlFile)", msgerr);
 xmlFile=xmlRead(SCI+"/etc/modules.xml");
+assert_checktrue(xmlIsValidObject(xmlFile));
 xmlFile2=xmlRead(SCI+"/etc/classpath.xml");
+assert_checktrue(xmlIsValidObject(xmlFile2));
 content=xmlDump(xmlFile);
 content2=xmlDump(xmlFile2);
 //assert_checkequal(content, content2);
@@ -31,6 +36,7 @@ xmlFile=xmlRead(SCI+"/etc/modules.xml");
 assert_checkequal(xmlFile.root.name,"modules");       
 assert_checkequal(xmlFile.root.type,"XML_ELEMENT_NODE");
 elements=xmlFile.root.children;
+assert_checktrue(xmlIsValidObject(elements));
 assert_checktrue(size(elements)>0);
 for (i=1:length(elements))
   if (xmlFile.root.children(i).type<>"XML_COMMENT_NODE")
index b40b8b4..d4e857a 100644 (file)
@@ -8,6 +8,10 @@
 
 
 xmlFile=xmlRead(SCI+"/etc/modules.xml");
+assert_checktrue(xmlIsValidObject(xmlFile));
+a=xmlGetOpenDocs();
+assert_checkequal(a(1).url, SCI+"/etc/modules.xml");
+
 content=xmlDump(xmlFile);
 assert_checktrue(length(content)>0);
 assert_checktrue(size(content)>=[20,1]);
@@ -18,7 +22,10 @@ assert_checkerror("xmlDelete(xmlFile)", msgerr);
 
 
 xmlFile=xmlRead(SCI+"/etc/modules.xml");
+assert_checktrue(xmlIsValidObject(xmlFile));
 xmlFile2=xmlRead(SCI+"/etc/classpath.xml");
+assert_checktrue(xmlIsValidObject(xmlFile2));
+
 content=xmlDump(xmlFile);
 content2=xmlDump(xmlFile2);
 //assert_checkequal(content, content2);
@@ -37,6 +44,7 @@ xmlFile=xmlRead(SCI+"/etc/modules.xml");
 assert_checkequal(xmlFile.root.name,"modules");       
 assert_checkequal(xmlFile.root.type,"XML_ELEMENT_NODE");
 elements=xmlFile.root.children;
+assert_checktrue(xmlIsValidObject(elements));
 assert_checktrue(size(elements)>0);
 for (i=1:length(elements))
   if (xmlFile.root.children(i).type<>"XML_COMMENT_NODE")