* Bug 13985 fixed: lists are nicely displayed 45/21645/7
Samuel GOUGEON [Sat, 12 Dec 2020 22:38:15 +0000 (23:38 +0100)]
  http://bugzilla.scilab.org/13985

  + Unit tests about display are gathered in [console]
  + Some .dia.ref about lists are removed

Change-Id: I1c3bc505b7fc2aa165de0774abd66642d520a900

186 files changed:
scilab/CHANGES.md
scilab/modules/ast/src/cpp/types/list.cpp
scilab/modules/ast/src/cpp/types/overload.cpp
scilab/modules/ast/src/cpp/types/struct.cpp
scilab/modules/ast/src/cpp/types/tlist.cpp
scilab/modules/ast/src/cpp/types/types_tools.cpp
scilab/modules/ast/tests/nonreg_tests/bug_16373.dia.ref
scilab/modules/ast/tests/unit_tests/newtype.dia.ref
scilab/modules/cacsd/tests/nonreg_tests/bug_13816.dia.ref
scilab/modules/cacsd/tests/unit_tests/lqe.dia.ref
scilab/modules/console/etc/XConfiguration-general.xsl
scilab/modules/console/tests/unit_tests/disp.dia.ref [moved from scilab/modules/output_stream/tests/unit_tests/disp.dia.ref with 100% similarity]
scilab/modules/console/tests/unit_tests/disp.tst [moved from scilab/modules/output_stream/tests/unit_tests/disp.tst with 100% similarity]
scilab/modules/console/tests/unit_tests/disp_complex.dia.ref [moved from scilab/modules/ast/tests/unit_tests/displaycomplex.dia.ref with 100% similarity]
scilab/modules/console/tests/unit_tests/disp_complex.tst [moved from scilab/modules/ast/tests/unit_tests/displaycomplex.tst with 100% similarity]
scilab/modules/console/tests/unit_tests/disp_lists.dia.ref [new file with mode: 0644]
scilab/modules/console/tests/unit_tests/disp_lists.tst [new file with mode: 0644]
scilab/modules/console/tests/unit_tests/disp_structures.dia.ref [moved from scilab/modules/data_structures/tests/unit_tests/struct_display.dia.ref with 100% similarity]
scilab/modules/console/tests/unit_tests/disp_structures.tst [moved from scilab/modules/data_structures/tests/unit_tests/struct_display.tst with 100% similarity]
scilab/modules/console/tests/unit_tests/display.dia.ref [moved from scilab/modules/core/tests/unit_tests/display.dia.ref with 85% similarity]
scilab/modules/console/tests/unit_tests/display.tst [moved from scilab/modules/core/tests/unit_tests/display.tst with 86% similarity]
scilab/modules/core/tests/nonreg_tests/bug_474.dia.ref
scilab/modules/core/tests/nonreg_tests/bug_6730.dia.ref
scilab/modules/core/tests/nonreg_tests/bug_6891.dia.ref
scilab/modules/core/tests/unit_tests/comment.dia.ref
scilab/modules/core/tests/unit_tests/parse.dia.ref
scilab/modules/data_structures/tests/nonreg_tests/bug_1604.dia.ref
scilab/modules/data_structures/tests/nonreg_tests/bug_4171.dia.ref
scilab/modules/data_structures/tests/unit_tests/list.dia.ref [deleted file]
scilab/modules/data_structures/tests/unit_tests/list.tst
scilab/modules/data_structures/tests/unit_tests/listextraction.dia.ref [deleted file]
scilab/modules/data_structures/tests/unit_tests/listextraction.tst
scilab/modules/data_structures/tests/unit_tests/listinsertion.dia.ref [deleted file]
scilab/modules/data_structures/tests/unit_tests/listinsertion.tst
scilab/modules/data_structures/tests/unit_tests/lstops.dia.ref [deleted file]
scilab/modules/data_structures/tests/unit_tests/lstops.tst
scilab/modules/development_tools/tests/unit_tests/assert/checkfilesequal.dia.ref
scilab/modules/differential_equations/tests/nonreg_tests/bug_4948.dia.ref
scilab/modules/dynamic_link/tests/nonreg_tests/bug_2119.win.dia.ref
scilab/modules/dynamic_link/tests/unit_tests/G_make.win.dia.ref
scilab/modules/dynamic_link/tests/unit_tests/schur_external.win.dia.ref
scilab/modules/elementary_functions/tests/unit_tests/IEEEcompatibility.dia.ref
scilab/modules/external_objects_java/tests/unit_tests/jallowClassReloading.dia.ref
scilab/modules/external_objects_java/tests/unit_tests/jinvoke_db.dia.ref
scilab/modules/fileio/tests/nonreg_tests/bug_1693.win.dia.ref
scilab/modules/graphic_export/tests/nonreg_tests/bug_13676.dia.ref
scilab/modules/graphic_export/tests/nonreg_tests/bug_4231.dia.ref
scilab/modules/graphic_export/tests/nonreg_tests/bug_4273.dia.ref
scilab/modules/graphic_export/tests/nonreg_tests/bug_4437.dia.ref
scilab/modules/graphic_export/tests/nonreg_tests/bug_4944.dia.ref
scilab/modules/graphic_export/tests/unit_tests/gif_non_empty_file.dia.ref
scilab/modules/graphic_export/tests/unit_tests/ps_non_empty_file.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1134.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1201.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_12119.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_12163.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_13402.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_13441.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_13733.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_14036.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1448.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1560.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1582.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1696.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1720.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_174.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1839.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_1873.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2141.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2175.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2210.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2222.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2255.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2365.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2540.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2631.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2797.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2813.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2814.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2870.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2888.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2934.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2936.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2953.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_2983.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3101.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3118.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3184.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3204.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3225.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3390.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3454.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3470.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3475.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3527.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3572.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3608.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3621.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3800.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3952.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3953.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_3954.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_4093.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_4106.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_4236.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_4463.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_4640.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_5844.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_6531.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_6720.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_6959.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_7509.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_7998.dia.ref
scilab/modules/graphics/tests/nonreg_tests/bug_8786.dia.ref
scilab/modules/graphics/tests/unit_tests/Matplot.dia.ref
scilab/modules/graphics/tests/unit_tests/arc.dia.ref
scilab/modules/graphics/tests/unit_tests/fec.dia.ref
scilab/modules/graphics/tests/unit_tests/figure.resizefcn.dia.ref
scilab/modules/graphics/tests/unit_tests/gce.dia.ref
scilab/modules/graphics/tests/unit_tests/glue_unglue.dia.ref
scilab/modules/graphics/tests/unit_tests/grayplot.dia.ref
scilab/modules/graphics/tests/unit_tests/is_handle_valid.dia.ref
scilab/modules/graphics/tests/unit_tests/line_style.dia.ref
scilab/modules/graphics/tests/unit_tests/mesh.dia.ref
scilab/modules/graphics/tests/unit_tests/polyline.dia.ref
scilab/modules/graphics/tests/unit_tests/rectangle.dia.ref
scilab/modules/graphics/tests/unit_tests/segs.dia.ref
scilab/modules/graphics/tests/unit_tests/ticks.dia.ref
scilab/modules/graphics/tests/unit_tests/xstring.dia.ref
scilab/modules/gui/tests/nonreg_tests/bug_2565.dia.ref
scilab/modules/gui/tests/nonreg_tests/bug_8827.dia.ref
scilab/modules/hdf5/tests/nonreg_tests/bug_15501.dia.ref
scilab/modules/helptools/tests/nonreg_tests/bug_10505.win.dia.ref
scilab/modules/helptools/tests/nonreg_tests/bug_1768.win.dia.ref
scilab/modules/helptools/tests/nonreg_tests/bug_8756.win.dia.ref
scilab/modules/helptools/tests/unit_tests/xmltohtml.win.dia.ref
scilab/modules/helptools/tests/unit_tests/xmltojar.win.dia.ref
scilab/modules/helptools/tests/unit_tests/xmltopdf.win.dia.ref
scilab/modules/helptools/tests/unit_tests/xmltops.win.dia.ref
scilab/modules/io/tests/nonreg_tests/bug_12296.dia.ref
scilab/modules/io/tests/nonreg_tests/bug_3453.dia.ref
scilab/modules/localization/tests/nonreg_tests/bug_13986.dia.ref
scilab/modules/localization/tests/unit_tests/UTF-8_Identifiers.dia.ref
scilab/modules/localization/tests/unit_tests/setlanguage.dia.ref
scilab/modules/localization/tests/unit_tests/unicode_io.win.dia.ref
scilab/modules/m2sci/tests/nonreg_tests/bug_1636.dia.ref
scilab/modules/m2sci/tests/nonreg_tests/bug_2656.dia.ref
scilab/modules/m2sci/tests/nonreg_tests/compat_functions/bug_1725.dia.ref
scilab/modules/matio/tests/nonreg_tests/bug_8783.dia.ref
scilab/modules/matio/tests/unit_tests/loadmatfile.dia.ref
scilab/modules/modules_manager/tests/unit_tests/tbx_make.win.dia.ref
scilab/modules/optimization/tests/nonreg_tests/bug_3056.dia.ref
scilab/modules/output_stream/tests/nonreg_tests/bug_11138.dia.ref
scilab/modules/output_stream/tests/nonreg_tests/bug_15640.dia.ref
scilab/modules/overloading/macros/%l_p.sci [new file with mode: 0644]
scilab/modules/overloading/macros/%l_p_inc.sci [new file with mode: 0644]
scilab/modules/overloading/macros/%st_p.sci
scilab/modules/overloading/tests/nonreg_tests/bug_10396.dia.ref
scilab/modules/overloading/tests/nonreg_tests/bug_9783.dia.ref
scilab/modules/overloading/tests/unit_tests/overloadingName.dia.ref
scilab/modules/overloading/tests/unit_tests/sparse.dia.ref
scilab/modules/polynomials/tests/nonreg_tests/bug_16158.dia.ref
scilab/modules/randlib/tests/unit_tests/grand_plot.dia.ref
scilab/modules/renderer/tests/nonreg_tests/bug_15984.dia.ref [new file with mode: 0644]
scilab/modules/renderer/tests/nonreg_tests/bug_7286.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Block.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Clone_SuperBlock_in_Diagram.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Deep_cloning.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Delete_objects.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Diagram.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Diagram_cloning.dia.ref
scilab/modules/scicos/tests/unit_tests/model/Insert_in_SuperBlock.dia.ref
scilab/modules/scicos/tests/unit_tests/model/SuperBlock.dia.ref
scilab/modules/scicos/tests/unit_tests/model/SuperBlock_in_SuperBlock.dia.ref
scilab/modules/scicos/tests/unit_tests/model/SuperBlock_misconnected.dia.ref
scilab/modules/scicos/tests/unit_tests/model/from_mlist.dia.ref
scilab/modules/scicos/tests/unit_tests/model/link_preservation.dia.ref
scilab/modules/scicos/tests/unit_tests/sciblk2.dia.ref
scilab/modules/string/tests/nonreg_tests/bug_14524.dia.ref
scilab/modules/tclsci/tests/nonreg_tests/bug_1566.dia.ref
scilab/modules/tclsci/tests/nonreg_tests/bug_1591.dia.ref
scilab/modules/windows_tools/tests/unit_tests/findfileassociation.dia.ref
scilab/modules/xcos/tests/nonreg_tests/bug_13011.win.dia.ref
scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.dia.ref
scilab/modules/xcos/tests/unit_tests/Integer/dlatch.dia.ref
scilab/modules/xcos/tests/unit_tests/blocks_set.dia.ref

index 2f9a160..7b1f48b 100644 (file)
@@ -197,6 +197,7 @@ Feature changes and additions
   - Any hypermatrix can be sorted along a dimension > 2.
 * `unique` is enabled for any 2D sparse arrays, in simple, 'c' and 'r' modes.
 * %chars constant added, to easily access to some selected sets of unicode symbols.
+* Lists are displayed in a more compact and comprehensive way.
 
 Help pages:
 -----------
@@ -287,9 +288,10 @@ Bug Fixes
 * [#12532](https://bugzilla.scilab.org/12532): From `browsevar`, clicking on any function did not edit it with `edit`. The content of libraries could not be displayed either.
 * [#12719](https://bugzilla.scilab.org/12719): `A(%s)` gave the same result as `A($)`.
 * [#12889](https://bugzilla.scilab.org/12889): In the help browser, add a menu allowing to select the language of help pages, regardless of the language of the session.
+* [#13417](https://bugzilla.scilab.org/13417): `csvRead` page did not document the way to use the `range` up to the last row/column.
 * [#13593](https://bugzilla.scilab.org/13593): `csvRead()` did not take the `range` into account when `header` is provided. `[]` could not be used as default `range`.
 * [#13762](https://bugzilla.scilab.org/13762): In the `fft` page, the formula for the inverse FFT missed the 1/n normalization factor.
-* [#13417](https://bugzilla.scilab.org/13417): `csvRead` page did not document the way to use the `range` up to the last row/column.
+* [#13985](https://bugzilla.scilab.org/13985): The display of lists was very loose and poor.
 * [#14435](https://bugzilla.scilab.org/14435): Errors were not well handled in overloaded functions.
 * [#14488](https://bugzilla.scilab.org/14488): The `frameflag=9` and `strf=".9."` values of these `plot2d` options were no longer accepted. Their documentation was ambiguous.
 * [#14718](https://bugzilla.scilab.org/14718): `user` is removed for a while but was still documented.
index d6fcb39..c5c1295 100644 (file)
@@ -14,7 +14,9 @@
 */
 
 #include <sstream>
+#include "configvariable.hxx"
 #include "double.hxx"
+#include "overload.hxx"
 #include "list.hxx"
 #include "void.hxx"
 #include "listinsert.hxx"
@@ -23,6 +25,7 @@
 #include "scilabWrite.hxx"
 #include "types_tools.hxx"
 #include "function.hxx"
+#include "scilabWrite.hxx"
 
 #ifndef NDEBUG
 #include "inspector.hxx"
@@ -150,6 +153,27 @@ List *List::clone()
 */
 bool List::toString(std::wostringstream& ostr)
 {
+    //call overload %type_p if exists
+    types::typed_list in;
+    types::typed_list out;
+
+    IncreaseRef();
+    in.push_back(this);
+    switch (Overload::generateNameAndCall(L"p", in, 1, out, false, false)) {
+        case Function::OK_NoResult:
+            // unresolved function, fallback to a basic display
+            break;
+        case Function::Error:
+            ConfigVariable::setError();
+            // fallthrough
+        case Function::OK:
+            ostr.str(L"");
+            DecreaseRef();
+            return true;
+    };
+    DecreaseRef();
+
+    // otherwise, display basic information
     if (getSize() == 0)
     {
         ostr.str(L"");
index 8caf65f..cc056ed 100644 (file)
@@ -63,7 +63,7 @@ types::Function::ReturnValue Overload::generateNameAndCall(const std::wstring& _
     }
 
     // if overload doesn't existe try with short name
-    std::wstring stFunc2 = buildOverloadName(_stFunctionName, in, _iRetCount, _isOperator, errorOnUndefined);
+    std::wstring stFunc2 = buildOverloadName(_stFunctionName, in, _iRetCount, _isOperator, true);
     if (symbol::Context::getInstance()->get(symbol::Symbol(stFunc)))
     {
         types::Function::ReturnValue ret = call(stFunc, in, _iRetCount, out, _isOperator, errorOnUndefined, _Location);
index 2f975c6..64fc468 100644 (file)
@@ -18,6 +18,7 @@
 #include "list.hxx"
 #include "int.hxx"
 #include "localization.hxx"
+#include "overload.hxx"
 #include "scilabWrite.hxx"
 #include "exp.hxx"
 #include "types_tools.hxx"
@@ -506,6 +507,27 @@ Struct* Struct::removeField(const std::wstring& _sKey)
 
 bool Struct::toString(std::wostringstream& ostr)
 {
+    //call overload %type_p if exists
+    types::typed_list in;
+    types::typed_list out;
+
+    IncreaseRef();
+    in.push_back(this);
+    switch (Overload::generateNameAndCall(L"p", in, 1, out, false, false)) {
+        case Function::OK_NoResult:
+            // unresolved function, fallback to a basic display
+            break;
+        case Function::Error:
+            ConfigVariable::setError();
+            // fallthrough
+        case Function::OK:
+            ostr.str(L"");
+            DecreaseRef();
+            return true;
+    };
+    DecreaseRef();
+
+    // otherwise, display basic information
     if (getSize() == 0)
     {
         ostr << L"0x0 struct array with no field.";
index f7c99ef..3e6c281 100644 (file)
@@ -340,32 +340,18 @@ bool TList::toString(std::wostringstream& ostr)
 
     IncreaseRef();
     in.push_back(this);
-
-    try
-    {
-        if (Overload::generateNameAndCall(L"p", in, 1, out) == Function::Error)
-        {
+    switch (Overload::generateNameAndCall(L"p", in, 1, out, false, false)) {
+        case Function::OK_NoResult:
+            // unresolved function, fallback to a basic display
+            break;
+        case Function::Error:
             ConfigVariable::setError();
-        }
-
-        ostr.str(L"");
-        DecreaseRef();
-        return true;
-    }
-    catch (ast::InternalError& e)
-    {
-        if (e.GetErrorType() == ast::TYPE_ERROR)
-        {
+            // fallthrough
+        case Function::OK:
+            ostr.str(L"");
             DecreaseRef();
-            throw e;
-        }
-
-        // avoid error message about undefined overload %type_p
-        ConfigVariable::resetError();
-        // reset where error filled by generateNameAndCall
-        ConfigVariable::resetWhereError();
-    }
-
+            return true;
+    };
     DecreaseRef();
 
     // special case for lss
index 56576fc..87629cf 100644 (file)
@@ -952,7 +952,7 @@ int getIndexWithDims(int* _piIndexes, const int* _piDims, int _iDims)
 
 types::Function::ReturnValue VariableToString(types::InternalType* pIT, const wchar_t* wcsVarName)
 {
-    if (pIT->hasToString() == false || pIT->isStruct())
+    if (pIT->hasToString() == false)
     {
         types::Function::ReturnValue ret = types::Function::Error;
         //call overload %type_p
index 6dc97d4..e5c6b79 100644 (file)
@@ -14,9 +14,6 @@
 //
 // <-- Short Description -->
 //fix issue of crashing in arm when displaying 0
-
 a = 0
  a  = 
-
    0.
-
index 41b8985..2a0dfda 100644 (file)
@@ -26,12 +26,9 @@ disp(a)
 This is my type.
 l=list(2, a, "test")
  l  = 
-       l(1)
-   2.
-       l(2)
-This is my type.
-       l(3)
-  "test"
+  (1) = 2
+  (2) : NewType
+  (3) = "test"
 // overload call
 b = newtype(%f);
 function %nt_p(h)
@@ -44,9 +41,6 @@ disp(b)
   "%nt_p: This is my type."
 l=list(2, b, "test")
  l  = 
-       l(1)
-   2.
-       l(2)
-  "%nt_p: This is my type."
-       l(3)
-  "test"
+  (1) = 2
+  (2) : NewType
+  (3) = "test"
index 92e2ca0..413c6ec 100644 (file)
@@ -7,8 +7,7 @@
 // <-- TEST WITH GRAPHIC -->
 s=poly(0,"s")
  s  = 
-    
-   s
+  s
 num=10*s+20;
 den=s^3+14*s^2+35*s-50;
 h=syslin("c",num/den);
index 2a4c256..5248975 100644 (file)
@@ -29,7 +29,7 @@ H = [0.14,0.42;
      0.5,0.86];
 //The noises covariance matrices 
 Q_e=eye(ne,ne);
-R_v=diag(1:ny); 
+R_v=diag(1:ny);
 S_ev=zeros(ne,ny);
 S_ev(1,1)=0.8;
 // |.                  |.
index 39a0ee2..6896a2e 100644 (file)
@@ -70,7 +70,7 @@
                 <NumericalSpinner gridx="3" gridy="5"
                           weightx="0"
                           min-value="0"
-                          max-value="10"
+                          max-value="30"
                           increment="1"
                           length="2"
                           listener="ActionListener"
diff --git a/scilab/modules/console/tests/unit_tests/disp_lists.dia.ref b/scilab/modules/console/tests/unit_tests/disp_lists.dia.ref
new file mode 100644 (file)
index 0000000..2811309
--- /dev/null
@@ -0,0 +1,123 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+// Copyright (C) 2020 - Samuel GOUGEON
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- CLI SHELL MODE -->
+//
+// <-- Short Description -->
+// Display of lists unitary tests
+%l_p(list())
+  empty list()
+%l_p(list(1,2,3))
+  (1) = 1
+  (2) = 2
+  (3) = 3
+%l_p(list(list(1,list()),2))
+  (1) : list:
+      (1) = 1
+      (2) : empty list()
+  (2) = 2
+[p, q] = (poly(rand(5,1),"z"), poly(rand(6,1),"z"));
+%l_p(list(rlist(q,p), 1.23))
+  (1) : [1x1 rational] of z
+  (2) = 1.23
+%l_p(list(1,1:$))
+  (1) = 1
+  (2) = 1:$
+%l_p(list(list(1:$)))
+  (1) : list:
+      (1) = 1:$
+%l_p(list(list(1,$),list()))
+  (1) : list:
+      (1) = 1
+      (2) = $
+  (2) : empty list()
+//
+films = struct("Title", "A.I. Artificial Intelligence",..
+               "Year", 2001, ..
+               "Director", "Steven Spielberg", ..
+               "Duration", 140);
+L = list([%t %f %f]',                ..
+         $:-1:3,                    ..
+         int8([1 2 3 ; 4 5 6]),     ..
+         [-%inf, -1, 0, %i, 7.1, 3.3e20, %inf, %nan], ..
+         sparse([0 1 2; 3 0 4]),    ..
+         ["This" "is" "some" "text"], ..
+         ,              ..
+         sin,           ..
+         logspace,      ..
+         iolib,         ..
+         {%pi, "abcd" ;
+          list(,)(1),(%i-%s)^3},    ..
+          {},           ..
+          list(["Hello" "Allo" "Hé"], uint64(12345678)^(1:3), ,grand(2,4,"uin",0,10)), ..
+          list(), ..
+         films);
+%l_p(L)
+  (1) : [3x1 boolean]
+  (2) = $:-1:3
+  (3) : [2x3 int8]
+  (4) = [-%inf,-1,0,%i,7.1,3.300D+20,%inf,%nan]
+  (5) : [2x3 sparse]
+  (6) = ["This","is","some","text"]
+  (7) = (void)
+  (8) : fptr
+  (9) : logspace(d1,d2,n) => [y] (42 lines)
+  (10) : iolib library with 5 functions @ SCI\modules\io\macros\
+  (11) : [2x2 cell]
+  (12) = {}
+  (13) : list:
+      (1) = ["Hello","Allo","Hé"]
+      (2) = uint64([12345678,1.524D+14,9.223D+18])
+      (3) = (void)
+      (4) : [2x4 constant]
+  (14) : empty list()
+  (15) : struct with fields:
+      Title = "A.I. Artificial Intelligence"
+      Year = 2001
+      Director = "Steven Spielberg"
+      Duration = 140
+// Tlist overloaded display
+TL = tlist("x",1,2)
+ TL  = 
+       TL(1)
+  "x"
+       TL(2)
+   1.
+       TL(3)
+   2.
+deff("%x_p(x)","disp(''Mydisplay'',x(2),x(3))")
+TL
+ TL  = 
+  "Mydisplay"
+   1.
+   2.
+list(TL)
+ ans  =
+  (1) : [x] tlist without field.
+list(list(TL))
+ ans  =
+  (1) : list:
+      (1) : [x] tlist without field.
+TL = tlist("x",1:$,2)
+ TL  = 
+  "Mydisplay"
+ 1:1:$
+   2.
+list(TL)
+ ans  =
+  (1) : [x] tlist without field.
+list(list(TL))
+ ans  =
+  (1) : list:
+      (1) : [x] tlist without field.
+TL(2) = TL
+ TL  = 
+  "Mydisplay"
+  "Mydisplay"
+ 1:1:$
+   2.
+   2.
diff --git a/scilab/modules/console/tests/unit_tests/disp_lists.tst b/scilab/modules/console/tests/unit_tests/disp_lists.tst
new file mode 100644 (file)
index 0000000..5ecaaad
--- /dev/null
@@ -0,0 +1,55 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) ????-2008 - INRIA
+// Copyright (C) 2020 - Samuel GOUGEON
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- CLI SHELL MODE -->
+//
+// <-- Short Description -->
+// Display of lists unitary tests
+
+%l_p(list())
+%l_p(list(1,2,3))
+%l_p(list(list(1,list()),2))
+[p, q] = (poly(rand(5,1),"z"), poly(rand(6,1),"z"));
+%l_p(list(rlist(q,p), 1.23))
+%l_p(list(1,1:$))
+%l_p(list(list(1:$)))
+%l_p(list(list(1,$),list()))
+
+//
+films = struct("Title", "A.I. Artificial Intelligence",..
+               "Year", 2001, ..
+               "Director", "Steven Spielberg", ..
+               "Duration", 140);
+L = list([%t %f %f]',                ..
+         $:-1:3,                    ..
+         int8([1 2 3 ; 4 5 6]),     ..
+         [-%inf, -1, 0, %i, 7.1, 3.3e20, %inf, %nan], ..
+         sparse([0 1 2; 3 0 4]),    ..
+         ["This" "is" "some" "text"], ..
+         ,              ..
+         sin,           ..
+         logspace,      ..
+         iolib,         ..
+         {%pi, "abcd" ;
+          list(,)(1),(%i-%s)^3},    ..
+          {},           ..
+          list(["Hello" "Allo" "Hé"], uint64(12345678)^(1:3), ,grand(2,4,"uin",0,10)), ..
+          list(), ..
+         films);
+%l_p(L)
+
+
+// Tlist overloaded display
+TL = tlist("x",1,2)
+deff("%x_p(x)","disp(''Mydisplay'',x(2),x(3))")
+TL
+list(TL)
+list(list(TL))
+TL = tlist("x",1:$,2)
+list(TL)
+list(list(TL))
+TL(2) = TL
@@ -16,7 +16,7 @@ x=[2.6533333 -0.0002]
 x'
  ans  =
    2.6533333
-  -0.0002   
+  -0.0002
 x=[]
  x  = 
     []
@@ -91,61 +91,50 @@ d3=[1+z**10 z**15];
 //display of rationals
 r=num./den
  r  = 
-         
    1  1  
    -  -  
    1  1  
 r'
  ans  =
-      
    1  
    -  
    1  
-      
    1  
    -  
    1  
 rlist(d,n)
  ans  =
-              
    1 +2z +z²  
    ---------  
      1 +z     
 rlist(n,d)
  ans  =
-              
      1 +z     
    ---------  
    1 +2z +z²  
 rlist(d2,n2)
  ans  =
-                                   
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
    ---------  -------------------  
      1 +z          1 +2z +z²       
-                                   
      1 +z          1 +2z +z²       
    ---------  -------------------  
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
 rlist(n2,d2)
  ans  =
-                                   
      1 +z          1 +2z +z²       
    ---------  -------------------  
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
-                                   
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
    ---------  -------------------  
      1 +z          1 +2z +z²       
 rlist(den,num)
  ans  =
-                                   
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
    ---------  -------------------  
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
 rlist(num,den)
  ans  =
-                                   
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
    ---------  -------------------  
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
@@ -154,7 +143,6 @@ rlist(p1,q1)
  
          column 1
  
-                                                                      
    -0.0000078 +0.0351988z -0.3720034z² +1.3432153z³ -1.9632981z⁴ +z⁵  
    -----------------------------------------------------------------  
      0.0123314 -0.2684985z +1.5393672z² -4.0114366z³ +5.4004179z⁴     
@@ -162,7 +150,6 @@ rlist(p1,q1)
  
          column 2
  
-                             
       0.1 +2.35z -5.05z³     
    ------------------------  
    2.56 +0.03z -10.01z² +z⁵  
@@ -172,7 +159,6 @@ rlist(q1,p1)
  
          column 1
  
-                                                                      
      0.0123314 -0.2684985z +1.5393672z² -4.0114366z³ +5.4004179z⁴     
       -3.6713072z⁵ +z⁶                                                
    -----------------------------------------------------------------  
@@ -180,46 +166,39 @@ rlist(q1,p1)
  
          column 2
  
-                             
    2.56 +0.03z -10.01z² +z⁵  
    ------------------------  
       0.1 +2.35z -5.05z³     
                              
 rlist(p,q)
  ans  =
-                                                                      
    -0.0000078 +0.0351988z -0.3720034z² +1.3432153z³ -1.9632981z⁴ +z⁵  
    -----------------------------------------------------------------  
      0.0123314 -0.2684985z +1.5393672z² -4.0114366z³ +5.4004179z⁴     
       -3.6713072z⁵ +z⁶                                                
 rlist(q,p)
  ans  =
-                                                                      
      0.0123314 -0.2684985z +1.5393672z² -4.0114366z³ +5.4004179z⁴     
       -3.6713072z⁵ +z⁶                                                
    -----------------------------------------------------------------  
    -0.0000078 +0.0351988z -0.3720034z² +1.3432153z³ -1.9632981z⁴ +z⁵  
 rlist(p,z)
  ans  =
-                                                                      
    -0.0000078 +0.0351988z -0.3720034z² +1.3432153z³ -1.9632981z⁴ +z⁵  
    -----------------------------------------------------------------  
                                    z                                  
 rlist(z,p)
  ans  =
-                                                                      
                                    z                                  
    -----------------------------------------------------------------  
    -0.0000078 +0.0351988z -0.3720034z² +1.3432153z³ -1.9632981z⁴ +z⁵  
 rlist(d1,n1)
  ans  =
-                                                                   
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
    ---------  -------------------  ---------  -------------------  
      1 +z          1 +2z +z²         1 +z          1 +2z +z²       
 rlist(n1,d1)
  ans  =
-                                                                   
      1 +z          1 +2z +z²         1 +z          1 +2z +z²       
    ---------  -------------------  ---------  -------------------  
    1 +2z +z²  1 +4z +6z² +4z³ +z⁴  1 +2z +z²  1 +4z +6z² +4z³ +z⁴  
@@ -448,114 +427,6 @@ dn = [d n];
   "abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyz"
   "1234567890"                                   
 lines(oldlines);
-// display of list
-list()
- ans  =
-     ()
-list(1,2,3)
- ans  =
-       ans(1)
-   1.
-       ans(2)
-   2.
-       ans(3)
-   3.
-list(list(1,list()),2)
- ans  =
-       ans(1)
-              ans(1)(1)
-   1.
-              ans(1)(2)
-     ()
-       ans(2)
-   2.
-list(rlist(q,p),1.23)
- ans  =
-       ans(1)
-                                                                      
-     0.0123314 -0.2684985z +1.5393672z² -4.0114366z³ +5.4004179z⁴     
-      -3.6713072z⁵ +z⁶                                                
-   -----------------------------------------------------------------  
-   -0.0000078 +0.0351988z -0.3720034z² +1.3432153z³ -1.9632981z⁴ +z⁵  
-       ans(2)
-   1.23
-// overloading of display
-1:$
- ans  =
- 1:1:$
-list(1,1:$)
- ans  =
-       ans(1)
-   1.
-       ans(2)
- 1:1:$
-list(list(1:$))
- ans  =
-       ans(1)
-              ans(1)(1)
- 1:1:$
-list(list(1,$),list())
- ans  =
-       ans(1)
-              ans(1)(1)
-   1.
-              ans(1)(2)
-  $
-       ans(2)
-     ()
-// Tlist overloaded display
-TL=tlist("x",1,2)
- TL  = 
-       TL(1)
-  "x"
-       TL(2)
-   1.
-       TL(3)
-   2.
-deff("%x_p(x)","disp(''Mydisplay'',x(2),x(3))")
-TL
- TL  = 
-  "Mydisplay"
-   1.
-   2.
-list(TL)
- ans  =
-       ans(1)
-  "Mydisplay"
-   1.
-   2.
-list(list(TL))
- ans  =
-       ans(1)
-              ans(1)(1)
-  "Mydisplay"
-   1.
-   2.
-TL=tlist("x",1:$,2)
- TL  = 
-  "Mydisplay"
- 1:1:$
-   2.
-list(TL)
- ans  =
-       ans(1)
-  "Mydisplay"
- 1:1:$
-   2.
-list(list(TL))
- ans  =
-       ans(1)
-              ans(1)(1)
-  "Mydisplay"
- 1:1:$
-   2.
-TL(2)=TL
- TL  = 
-  "Mydisplay"
-  "Mydisplay"
- 1:1:$
-   2.
-   2.
 // boolean
 %t
  ans  =
@@ -114,27 +114,6 @@ dn = [d n];
 
 lines(oldlines);
 
-// display of list
-list()
-list(1,2,3)
-list(list(1,list()),2)
-list(rlist(q,p),1.23)
-// overloading of display
-1:$
-list(1,1:$)
-list(list(1:$))
-list(list(1,$),list())
-// Tlist overloaded display
-TL=tlist("x",1,2)
-deff("%x_p(x)","disp(''Mydisplay'',x(2),x(3))")
-TL
-list(TL)
-list(list(TL))
-TL=tlist("x",1:$,2)
-list(TL)
-list(list(TL))
-TL(2)=TL
-
 // boolean
 %t
 %f
index eff3fa6..c6a7b70 100644 (file)
@@ -39,30 +39,30 @@ a=matrix(1:9,3,3)
    2.   5.   8.
    3.   6.   9.
 [mia,kia]=min(a)
- kia  = 
-   1.   1.
  mia  = 
    1.
+ kia  = 
+   1.   1.
 [maa,kaa]=max(a)
- kaa  = 
-   3.   3.
  maa  = 
    9.
+ kaa  = 
+   3.   3.
 b=int16(matrix(1:9,3,3))
  b  = 
   1  4  7
   2  5  8
   3  6  9
 [mib,kib]=min(b)
- kib  = 
-   1.   1.
  mib  = 
   1
+ kib  = 
+   1.   1.
 [mab,kab]=max(b)
- kab  = 
-   3.   3.
  mab  = 
   9
+ kab  = 
+   3.   3.
 if mia<>mib     then bugmes();quit;end
 if or(kia<>kib) then bugmes();quit;end
 if maa<>mab     then bugmes();quit;end
index e310ef9..0145468 100644 (file)
@@ -19,7 +19,7 @@ b=mlist(['foo','hello'],myfun);
 c=mlist(['foo','hello'],list('xxxx','yyyyy','zzzzz'));
 [x,y,z]=b.hello()
  x  = 
-     ()
+  empty list()
  y  = 
    2.
  z  = 
@@ -27,7 +27,7 @@ c=mlist(['foo','hello'],list('xxxx','yyyyy','zzzzz'));
 if x<>list()|y<>2|z<>3 then bugmes();quit;end
 [x,y,z]=a.hello()
  x  = 
-     ()
+  empty list()
  y  = 
    2.
  z  = 
index 2782414..9d3bebc 100644 (file)
@@ -22,7 +22,7 @@ Name                     Type           Size           Bytes
 whos -name corel
 Name                     Type           Size           Bytes        
  
-corelib                  library                       1184         
+corelib                  library                       1248         
 whos -type polynomial
 Name                     Type           Size           Bytes        
  
index ff08b8d..da6bcdc 100644 (file)
@@ -357,12 +357,12 @@ T=macr2tree(foo);
   "hhh hh"          
   "loop end"        
  L  = 
-   1. 
-   3. 
-   5. 
-   6. 
-   8. 
-   9. 
+   1.
+   3.
+   5.
+   6.
+   8.
+   9.
    10.
    11.
    12.
index 1d3c53a..070049c 100644 (file)
@@ -181,10 +181,8 @@ str_l=list();str_l(1)=1;str_l(1)
    1.
 l=list(1,2,3);l(3)=null()
  l  = 
-       l(1)
-   1.
-       l(2)
-   2.
+  (1) = 1
+  (2) = 2
 function []=foo()
     [noeuds,triang]=resume(1,2)
 endfunction
@@ -212,8 +210,7 @@ deff("t1=foo()","t1(2)= 1");foo()
    1.
 deff("t1=foo()","t1=list();t1(1)= 44;");foo()
  ans  =
-       ans(1)
-   44.
+  (1) = 44
 deff("[a,b,x]=foo()","[a(1),b(1,2),x]=(3,4,5);");[a,b,x]=foo()
  a  = 
    3.
@@ -224,7 +221,7 @@ deff("[a,b,x]=foo()","[a(1),b(1,2),x]=(3,4,5);");[a,b,x]=foo()
 function [a,b,x]=foo(),u=5;[a(1),b(1,2),x]=(3,4,u),a(2)=44,endfunction
 [a,b,x]=foo()
  a  = 
-   3. 
+   3.
    44.
  b  = 
    0.   4.
@@ -252,8 +249,6 @@ foo()
 function l=foo(),l=list(1,2,3);l(3)=null();endfunction
 foo()
  ans  =
-       ans(1)
-   1.
-       ans(2)
-   2.
+  (1) = 1
+  (2) = 2
 funcprot(1);
index 493c028..a53a28b 100644 (file)
@@ -13,7 +13,7 @@
 //
 // <-- Short Description -->
 //Bug in parser while manipulating tlist inside list.
-//Note that the bug is only visible/reproducible in release mode under 
+//Note that the bug is only visible/reproducible in release mode under
 //Windows. It should also happen in debug but can't be easily seen...
 t=list(gca());//create the data
 R = t(1).data_bounds(:,1); //crash
index 81994e9..6a619da 100644 (file)
@@ -35,12 +35,12 @@ tl2 = tlist("X", tl1, tl1)
 l1 = list(stru);
 l2 = list(l1, l1)
  l2  = 
-       l2(1)
-              l2(1)(1)
-  field = "value"
-       l2(2)
-              l2(2)(1)
-  field = "value"
+  (1) : list:
+      (1) : struct with fields:
+          field = "value"
+  (2) : list:
+      (1) : struct with fields:
+          field = "value"
 // Bug 11484 (duplicate)
 // ---------
 x = struct('a',4,'b',3);
@@ -50,14 +50,14 @@ list_c = list();
 list_c(0) = list(x,y);
 list_c(0) = list(z)
  list_c  = 
-       list_c(1)
-              list_c(1)(1)
-  a = 7
-  b = 2
-       list_c(2)
-              list_c(2)(1)
-  a = 4
-  b = 3
-              list_c(2)(2)
-  a = 5
-  b = 6
+  (1) : list:
+      (1) : struct with fields:
+          a = 7
+          b = 2
+  (2) : list:
+      (1) : struct with fields:
+          a = 4
+          b = 3
+      (2) : struct with fields:
+          a = 5
+          b = 6
diff --git a/scilab/modules/data_structures/tests/unit_tests/list.dia.ref b/scilab/modules/data_structures/tests/unit_tests/list.dia.ref
deleted file mode 100644 (file)
index a9e129f..0000000
+++ /dev/null
@@ -1,72 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2014-2014 - Scilab Enterprises - Bruno JOFRET
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-// <-- CLI SHELL MODE -->
-// test de creation des listes avec des elements null()
-l = list(,);
-m = l(1);
-n = l(2);
-assert_checkfalse(isdef("m"));
-assert_checkfalse(isdef("n"));
-l = list(1,);
-n = l(2);
-assert_checkfalse(isdef("n"));
-assert_checkequal(l(1), 1);
-l = list(,1);
-m = l(1);
-assert_checkfalse(isdef("m"));
-assert_checkequal(l(2), 1);
-l = list(,,);
-m = l(1);
-n = l(2);
-p = l(3);
-assert_checkfalse(isdef("m"));
-assert_checkfalse(isdef("n"));
-assert_checkfalse(isdef("p"));
-l = list(1,,);
-n = l(2);
-p = l(3);
-assert_checkequal(l(1), 1);
-assert_checkfalse(isdef("n"));
-assert_checkfalse(isdef("p"));
-l = list(,1,);
-m = l(1);
-p = l(3);
-assert_checkfalse(isdef("m"));
-assert_checkequal(l(2), 1);
-assert_checkfalse(isdef("p"));
-l = list(,,1);
-m = l(1);
-n = l(2);
-assert_checkfalse(isdef("m"));
-assert_checkfalse(isdef("n"));
-assert_checkequal(l(3), 1);
-l = list(1,1,);
-p = l(3);
-assert_checkequal(l(1), 1);
-assert_checkequal(l(2), 1);
-assert_checkfalse(isdef("p"));
-l = list(1,,1);
-n = l(2);
-assert_checkequal(l(1), 1);
-assert_checkfalse(isdef("n"));
-assert_checkequal(l(3), 1);
-l = list(,1,1);
-m = l(1);
-assert_checkfalse(isdef("m"));
-assert_checkequal(l(2), 1);
-assert_checkequal(l(3), 1);
-a=list(list(1));
-b=a;
-b(1)(1) = 2;
-// a must not be modified !
-assert_checkequal(a, list(list(1)));
-// check error in print overload
-ml=mlist(["test" "f1"], 15);
-function %test_p(varargin)
-    error("overload error");
-end
-assert_checkerror("disp(ml)", "overload error");
index b576434..7d7fadb 100644 (file)
@@ -1,11 +1,12 @@
 // =============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2014-2014 - Scilab Enterprises - Bruno JOFRET
+// Copyright (C) 2014 - Scilab Enterprises - Bruno JOFRET
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- CLI SHELL MODE -->
-
+// <-- NO CHECK REF -->
+//
 // test de creation des listes avec des elements null()
 
 l = list(,);
diff --git a/scilab/modules/data_structures/tests/unit_tests/listextraction.dia.ref b/scilab/modules/data_structures/tests/unit_tests/listextraction.dia.ref
deleted file mode 100644 (file)
index 3382df0..0000000
+++ /dev/null
@@ -1,76 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) ????-2008 - INRIA
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-// <-- CLI SHELL MODE -->
-// test des insertions dans les listes
-a=1,b=3;c=2;d=[1 2 3];e=[3 4 5];f=[10;20];g=[44 55];
- a  = 
-   1.
-h=5;i=4;a0=10;c0=20;b0=30;g0=[44 55 66; 10 20 30];
-l=list(a);if l(1)<>a then bugmes();quit;end
-l=list(a);if l(1)(1)<>a(1) then bugmes();quit;end
-l=list(a);if l(1)(1,1)<>a(1,1) then bugmes();quit;end
-l=list(a,d,b);if l(2)<>d then bugmes();quit;end
-l=list(a,d,b);if l(2)(1:2)<>d(1:2) then bugmes();quit;end
-l=list(a,d,b);if l(2)(1,2)<>d(1,2) then bugmes();quit;end
-//
-l=list(a,list(b,c,d));if l(2)(3)<>d then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(3)<>d(3) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)([3 1])<>d([3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(1,[3 1])<>d(1,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(:,[3 1])<>d(:,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(:,[$ 1])<>d(:,[$ 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)($,[$ 1])<>d($,[$ 1]) then bugmes();quit;end
-//
-l=list(a,list(b,c,d),h);if l(2)(3)<>d then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(3)<>d(3) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)([3 1])<>d([3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(1,[3 1])<>d(1,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(:,[3 1])<>d(:,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(:,[$ 1])<>d(:,[$ 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)($,[$ 1])<>d($,[$ 1]) then bugmes();quit;end
-//
-l=list(a,1/%s);if l(2)<>1/%s then bugmes();quit;end
-l=list(a,1/%s);if l(2)('num')<>1 then bugmes();quit;end
-l=list(a,1/%s,g);if l(2)('den')(1,1)<>%s then bugmes();quit;end
-l=list(a,1/%s,g);if l(2)<>1/%s then bugmes();quit;end
-l=list(a,1/%s,g);if l(2)('num')<>1 then bugmes();quit;end
-l=list(a,1/%s,g);if l(2)('den')(1,1)<>%s then bugmes();quit;end
-a=1:10,b=3:2:33;c=(-10:0)';d=[1 2+%s 3];e=['1';'2';'3';'4'];
- a  = 
-   1.   2.   3.   4.   5.   6.   7.   8.   9.   10.
-f=[%t %t %f];g=['12345','abcdefghijk'];
-h=rand(3,3);i=eye(10,10);a0=10+%s;c0=20;b0=sparse(eye(30,30));
-l=list(a);if l(1)<>a then bugmes();quit;end
-l=list(a);if l(1)(1)<>a(1) then bugmes();quit;end
-l=list(a);if l(1)(1,1)<>a(1,1) then bugmes();quit;end
-l=list(a,d,b);if l(2)<>d then bugmes();quit;end
-l=list(a,d,b);if l(2)(1:2)<>d(1:2) then bugmes();quit;end
-l=list(a,d,b);if l(2)(1,2)<>d(1,2) then bugmes();quit;end
-//
-l=list(a,list(b,c,d));if l(2)(3)<>d then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(3)<>d(3) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)([3 1])<>d([3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(1,[3 1])<>d(1,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(:,[3 1])<>d(:,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)(:,[$ 1])<>d(:,[$ 1]) then bugmes();quit;end
-l=list(a,list(b,c,d));if l(2)(3)($,[$ 1])<>d($,[$ 1]) then bugmes();quit;end
-//
-l=list(a,list(b,c,d),h);if l(2)(3)<>d then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(3)<>d(3) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)([3 1])<>d([3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(1,[3 1])<>d(1,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(:,[3 1])<>d(:,[3 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)(:,[$ 1])<>d(:,[$ 1]) then bugmes();quit;end
-l=list(a,list(b,c,d),h);if l(2)(3)($,[$ 1])<>d($,[$ 1]) then bugmes();quit;end
-//
-N=[1 2 3];
-l=list(a,N/%s);if l(2)<>N/%s then bugmes();quit;end
-l=list(a,N/%s);if l(2)('num')<>N then bugmes();quit;end
-l=list(a,N/%s,g);if l(2)('den')(1,1)<>%s then bugmes();quit;end
-l=list(a,N/%s,g);if l(2)<>N/%s then bugmes();quit;end
-l=list(a,N/%s,g);if l(2)('num')<>N then bugmes();quit;end
-l=list(a,N/%s,g);if l(2)('den')(1,1)<>%s then bugmes();quit;end
index 0f5c308..bd9f8e9 100644 (file)
@@ -5,6 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- CLI SHELL MODE -->
+// <-- NO CHECK REF -->
 
 // test des insertions dans les listes
 a=1,b=3;c=2;d=[1 2 3];e=[3 4 5];f=[10;20];g=[44 55];
diff --git a/scilab/modules/data_structures/tests/unit_tests/listinsertion.dia.ref b/scilab/modules/data_structures/tests/unit_tests/listinsertion.dia.ref
deleted file mode 100644 (file)
index 60b124b..0000000
+++ /dev/null
@@ -1,341 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) ????-2008 - INRIA
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-// <-- CLI SHELL MODE -->
-// test des insertions dans les listes
-a=1;b=3;c=2;d=[1 2 3];e=[3 4 5];f=[10;20];g=[44 55];
-h=5;i=4;a0=10;c0=20;b0=30;g0=[44 55 66; 10 20 30];
-l=list();l(0)=a;if l<>list(a) then bugmes();quit;end
-l=list();l(1)=a;if l<>list(a) then bugmes();quit;end
-l=list(a);l(2)=b;if l<>list(a,b) then bugmes();quit;end
-l=list(a);l(0)=b;if l<>list(b,a) then bugmes();quit;end
-l=list(a);l(1)=c;if l<>list(c)  then bugmes();quit;end
-l=list(a);l(1)=d;if l<>list(d)  then bugmes();quit;end
-l=list(d);l(1)=a;if l<>list(a) then bugmes();quit;end
-l=list(a);l(1)=null();if l<>list() then bugmes();quit;end
-l=list(a,c);l(1)=null();if l<>list(c) then bugmes();quit;end
-l=list(a,c);l(2)=null();if l<>list(a) then bugmes();quit;end
-l=list(a,c,b);l(2)=null();if l<>list(a,b) then bugmes();quit;end
-l=list(a,c,b);l(2)=e;if l<>list(a,e,b) then bugmes();quit;end
-l=list(a,e,b);l(2)=a;if l<>list(a,c,b) then bugmes();quit;end
-l=list();l(0)=null();if l<>list() then bugmes();quit;end
-l=list();l(1)=null();if l<>list() then bugmes();quit;end
-//
-l=list(a);l(0)=list(c,b);if l<>list(list(c,b),a) then bugmes();quit;end
-l=list(a);l(2)=list(c,b);if l<>list(a,list(c,b)) then bugmes();quit;end
-l=list(a,list(c,b));l(3)=i;if l<>list(a,list(c,b),i) then bugmes();quit;end
-l=list(a,list(c,b),i);l(1)=null();if l<>list(list(c,b),i) then bugmes();quit;end
-l=list(a,list(c,b),i);l(2)=null();if l<>list(a,i) then bugmes();quit;end
-l=list(a,list(c,b),i);l(3)=null();if l<>list(a,list(c,b)) then bugmes();quit;end
-//
-l=list(a,list(c,b,i),h);l(2)(2)=a0;if l<>list(a,list(c,a0,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(2)=f;if l<>list(a,list(c,f,i),h) then bugmes();quit;end
-l=list(a,list(c,f,i),h);l(2)(2)=b;if l<>list(a,list(c,b,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(3)=a0;if l<>list(a,list(c,b,a0),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(3)=f;if l<>list(a,list(c,b,f),h) then bugmes();quit;end
-l=list(a,list(c,b,f),h);l(2)(3)=i;if l<>list(a,list(c,b,i),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(3)=i;if l<>list(a,list(c,b,i),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(0)=a;if l<>list(a,list(a,c,b),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(2)=null();if l<>list(a,list(c,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(1)=null();if l<>list(a,list(b,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(3)=null();if l<>list(a,list(c,b),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(3)=g;if l<>list(a,list(c,b,g),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(0)=e;if l<>list(a,list(e,c,b),h) then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(1)=0;if l<>list(a,list(c,list(0,c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(1)=null();if l<>list(a,list(c,list(c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(1)=g;if l<>list(a,list(c,list(g,c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(0)=g;if l<>list(a,list(c,list(g,a0,c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(3)=g;if l<>list(a,list(c,list(a0,c0,g),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(3)=null();if l<>list(a,list(c,list(a0,c0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(4)=g;if l<>list(a,list(c,list(a0,c0,b0,g),b),h); then bugmes();quit;end
-l=list();l(5)=33;
-ll=l;
-l=list(a,1/%s);l(2)("num")=33;if l<>list(a,33/%s) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")=%s+1;if l<>list(a,((%s+1)/%s)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("den")=%s^1+1;if l<>list(a,1/(%s^2+1)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1)=33;if l<>list(a,33/%s) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1)=%s+1;if l<>list(a,((%s+1)/%s)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("den")(1)=%s^1+1;if l<>list(a,1/(%s^2+1)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1,1)=33;if l<>list(a,33/%s) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1,1)=%s+1;if l<>list(a,((%s+1)/%s)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("den")(1,1)=%s^1+1;if l<>list(a,1/(%s^2+1)) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")=33;if l<>list(a,33/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")=%s+1;if l<>list(a,(%s+1)/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("den")=%s^1+1;if l<>list(a,1/(%s^2+1),g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1)=33;if l<>list(a,33/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1)=%s+1;if l<>list(a,(%s+1)/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("den")(1)=%s^1+1;if l<>list(a,1/(%s^2+1),g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1,1)=33;if l<>list(a,33/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1,1)=%s+1;if l<>list(a,(%s+1)/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("den")(1,1)=%s^1+1;if l<>list(a,1/(%s^2+1),g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1,2)=33;l(2)("den")(1,2)=%s+1;
-if l<>list(a,[1 33]./[%s %s+1],g) then bugmes();quit;end
-//a=1;b=3;c=2;d=[1 2 3];e=[3 4 5];f=[10;20];g=[44 55];
-//h=5;i=4;a0=10;c0=20;b0=30;g0=[44 55 66; 10 20 30];
-l=list(a);l(1)(1)=3;x=a;x(1)=3;if l<>list(x) then bugmes();quit;end
-l=list(e);l(1)(2)=[];x=e;x(2)=[];if l<>list(x) then bugmes();quit;end
-l=list(a);l(1)(1,1)=3;x=a;x(1,1)=3;if l<>list(x) then bugmes();quit;end
-l=list(e);l(1)(1,2)=[];x=e;x(1,2)=[];if l<>list(x) then bugmes();quit;end
-l=list(a);l(1)(5,5)=3;x=a;x(5,5)=3;if l<>list(x) then bugmes();quit;end
-l=list(g0);l(1)(2,3)=3;x=g0;x(2,3)=3;if l<>list(x) then bugmes();quit;end
-l=list(b,a);l(2)(1)=3;x=a;x(1)=3;if l<>list(b,x) then bugmes();quit;end
-l=list(b,e);l(2)(2)=[];x=e;x(2)=[];if l<>list(b,x) then bugmes();quit;end
-l=list(b,a);l(2)(1,1)=3;x=a;x(1,1)=3;if l<>list(b,x) then bugmes();quit;end
-l=list(b,e);l(2)(1,2)=[];x=e;x(1,2)=[];if l<>list(b,x) then bugmes();quit;end
-l=list(b,a);l(2)(5,5)=3;x=a;x(5,5)=3;if l<>list(b,x) then bugmes();quit;end
-l=list(b,g0);l(2)(2,3)=3;x=g0;x(2,3)=3;if l<>list(b,x) then bugmes();quit;end
-l=list(b,g0);l(2)(2,2:3)=[1 3];x=g0;x(2,2:3)=[1 3];if l<>list(b,x) then bugmes();quit;end
-a=1:10;b=3:2:33;c=(-10:0)';d=[1 2+%s 3];e=["1";"2";"3";"4"];
-f=[%t %t %f];g=["12345","abcdefghijk"];
-h=rand(3,3);i=eye(10,10);a0=10+%s;c0=20;b0=sparse(eye(30,30));
-l=list();l(0)=a;if l<>list(a) then bugmes();quit;end
-l=list();l(1)=a;if l<>list(a) then bugmes();quit;end
-l=list(a);l(2)=b;if l<>list(a,b) then bugmes();quit;end
-l=list(a);l(0)=b;if l<>list(b,a) then bugmes();quit;end
-l=list(a);l(1)=c;if l<>list(c)  then bugmes();quit;end
-l=list(a);l(1)=d;if l<>list(d)  then bugmes();quit;end
-l=list(d);l(1)=a;if l<>list(a) then bugmes();quit;end
-l=list(a);l(1)=null();if l<>list() then bugmes();quit;end
-l=list(a,c);l(1)=null();if l<>list(c) then bugmes();quit;end
-l=list(a,c);l(2)=null();if l<>list(a) then bugmes();quit;end
-l=list(a,c,b);l(2)=null();if l<>list(a,b) then bugmes();quit;end
-l=list(a,c,b);l(2)=e;if l<>list(a,e,b) then bugmes();quit;end
-l=list(a,e,b);l(2)=a;if l<>list(a,c,b) then bugmes();quit;end
-l=list();l(0)=null();if l<>list() then bugmes();quit;end
-l=list();l(1)=null();if l<>list() then bugmes();quit;end
-//
-l=list(a);l(0)=list(c,b);if l<>list(list(c,b),a) then bugmes();quit;end
-l=list(a);l(2)=list(c,b);if l<>list(a,list(c,b)) then bugmes();quit;end
-l=list(a,list(c,b));l(3)=i;if l<>list(a,list(c,b),i) then bugmes();quit;end
-l=list(a,list(c,b),i);l(1)=null();if l<>list(list(c,b),i) then bugmes();quit;end
-l=list(a,list(c,b),i);l(2)=null();if l<>list(a,i) then bugmes();quit;end
-l=list(a,list(c,b),i);l(3)=null();if l<>list(a,list(c,b)) then bugmes();quit;end
-//
-l=list(a,list(c,b,i),h);l(2)(2)=a0;if l<>list(a,list(c,a0,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(2)=f;if l<>list(a,list(c,f,i),h) then bugmes();quit;end
-l=list(a,list(c,f,i),h);l(2)(2)=b;if l<>list(a,list(c,b,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(3)=a0;if l<>list(a,list(c,b,a0),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(3)=f;if l<>list(a,list(c,b,f),h) then bugmes();quit;end
-l=list(a,list(c,b,f),h);l(2)(3)=i;if l<>list(a,list(c,b,i),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(3)=i;if l<>list(a,list(c,b,i),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(0)=a;if l<>list(a,list(a,c,b),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(2)=null();if l<>list(a,list(c,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(1)=null();if l<>list(a,list(b,i),h) then bugmes();quit;end
-l=list(a,list(c,b,i),h);l(2)(3)=null();if l<>list(a,list(c,b),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(3)=g;if l<>list(a,list(c,b,g),h) then bugmes();quit;end
-l=list(a,list(c,b),h);l(2)(0)=e;if l<>list(a,list(e,c,b),h) then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(1)=0;if l<>list(a,list(c,list(0,c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(1)=null();if l<>list(a,list(c,list(c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(1)=g;if l<>list(a,list(c,list(g,c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(0)=g;if l<>list(a,list(c,list(g,a0,c0,b0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(3)=g;if l<>list(a,list(c,list(a0,c0,g),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(3)=null();if l<>list(a,list(c,list(a0,c0),b),h); then bugmes();quit;end
-l=list(a,list(c,list(a0,c0,b0),b),h);
-l(2)(2)(4)=g;if l<>list(a,list(c,list(a0,c0,b0,g),b),h); then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")=33;if l<>list(a,33/%s) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")=%s+1;if l<>list(a,((%s+1)/%s)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("den")=%s^1+1;if l<>list(a,1/(%s^2+1)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1)=33;if l<>list(a,33/%s) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1)=%s+1;if l<>list(a,((%s+1)/%s)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("den")(1)=%s^1+1;if l<>list(a,1/(%s^2+1)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1,1)=33;if l<>list(a,33/%s) then bugmes();quit;end
-l=list(a,1/%s);l(2)("num")(1,1)=%s+1;if l<>list(a,((%s+1)/%s)) then bugmes();quit;end
-l=list(a,1/%s);l(2)("den")(1,1)=%s^1+1;if l<>list(a,1/(%s^2+1)) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")=33;if l<>list(a,33/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")=%s+1;if l<>list(a,(%s+1)/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("den")=%s^1+1;if l<>list(a,1/(%s^2+1),g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1)=33;if l<>list(a,33/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1)=%s+1;if l<>list(a,(%s+1)/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("den")(1)=%s^1+1;if l<>list(a,1/(%s^2+1),g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1,1)=33;if l<>list(a,33/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1,1)=%s+1;if l<>list(a,(%s+1)/%s,g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("den")(1,1)=%s^1+1;if l<>list(a,1/(%s^2+1),g) then bugmes();quit;end
-l=list(a,1/%s,g);l(2)("num")(1,2)=33;l(2)("den")(1,2)=%s+1;
-if l<>list(a,[1 33]./[%s %s+1],g) then bugmes();quit;end
-//test with field names not defined in the structure here row1 and row2
-function M=%to_e(varargin)
-    M = varargin($),
-    select varargin(1)
-    case "row2" then
-        M.N = M.N(2, eye())
-        M.V = M.V(2, eye())
-    case "row1" then
-        M.N = M.N(1, eye())
-        M.V = M.V(1, eye())
-    else
-        M.N = M.N(varargin(1:$ - 1))
-        M.V = M.V(varargin(1:$ - 1))
-    end
-endfunction
-%to_6=%to_e;
-function M=%to_i_to(varargin)
-    M=varargin($);N=varargin($-1)
-    select varargin(1)
-    case "row2"
-        M.N(2,:)=N.N
-        M.V(2,:)=N.V
-    case "row1"
-        M.N(1,:)=N.N
-        M.V(1,:)=N.V
-    else
-        M.N(varargin(1:$-2))=N.N
-        M.V(varargin(1:$-2))=N.V
-    end
-endfunction
-M=mlist(["to","V","N"],[1 2 3;4 5 6],["a","b","c";"d","e","f"]);
-M.row1(2)=M.row2(1);
-assert_checkequal(M.V, [1 4 3;4 5 6]);
-assert_checkequal(M.N, ["a","d","c";"d","e","f"]);
-l=list(1,M,2);
-l(2).row1(2)=M.row1(1);
-assert_checkequal(l(1), 1);
-assert_checkequal(l(2).V, [1 1 3;4 5 6]);
-assert_checkequal(l(2).N, ["a","a","c";"d","e","f"]);
-assert_checkequal(M.V, [1 4 3;4 5 6]);
-assert_checkequal(M.N, ["a","d","c";"d","e","f"]);
-l(1)="foo";
-assert_checkequal(l(1), "foo");
-//test of insertion in structs (a particular mlist)
-clear S;
-S.a=11;
-S(2).a=12;
-assert_checkequal(S.a, list(11,12));
-clear S;
-S.a=11;
-S.a(2,2)=12;
-assert_checkequal(S.a, diag([11,12]));
-clear S;
-S.a=11;
-S(2).b=12;
-assert_checkequal(S.a, list(11,[]));
-assert_checkequal(S.b, list([],12));
-clear S S1 S2;
-S.a=11;
-S(2).b=12;
-S1.a=33;
-S1.b="toto";
-S(1)=S1;
-assert_checkequal(S.a, list(33,[]));
-assert_checkequal(S.b, list("toto",12));
-S(2,2)=S1;
-assert_checkequal(S.a, list(33,[],[],33));
-assert_checkequal(S.b, list("toto",12,[],"toto"));
-S2.a=-5;
-S2.c=8;
-S(2,2,2)=S2;
-assert_checkequal(S.a, list(33,[],[],33,[],[],[],-5));
-assert_checkequal(S.b, list("toto",12,[],"toto",[],[],[],[]));
-assert_checkequal(S.c, list([],[],[],[],[],[],[],8));
-S1=S(:,1,1);
-assert_checkequal(S1.a, list(33,[]));
-assert_checkequal(S1.b, list("toto",12));
-assert_checkequal(S1.c, list([],[]));
-S1=S(1:2,1,1);
-assert_checkequal(S1.a, list(33,[]));
-assert_checkequal(S1.b, list("toto",12));
-assert_checkequal(S1.c, list([],[]));
-S1=S([1 1],1,1);
-assert_checkequal(S1.a, list(33,33));
-assert_checkequal(S1.b, list("toto","toto"));
-assert_checkequal(S1.c, list([],[]));
-S1=S([1 2 1],1,1);
-assert_checkequal(S1.a, list(33,[],33));
-assert_checkequal(S1.b, list("toto",12,"toto"));
-assert_checkequal(S1.c, list([],[],[]));
-S1=S(1,:,1);
-assert_checkequal(S1.a, list(33,[]));
-assert_checkequal(S1.b, list("toto",[]));
-assert_checkequal(S1.c, list([],[]));
-S1=S(:,:);
-assert_checkequal(S1.a, list(33,[],[],33,[],[],[],-5));
-assert_checkequal(S1.b, list("toto",12,[],"toto",[],[],[],[]));
-assert_checkequal(S1.c, list([],[],[],[],[],[],[],8));
-S=struct();
-S.a(2).b=1;
-assert_checkequal(S.a.b, list([],1));
-clear S;
-S.a(2).b=1;
-assert_checkequal(S.a.b, list([],1));
-S=struct();
-S(2).a.b=1;
-assert_checkequal(S(1).a, []);
-assert_checkequal(S(2).a.b, 1);
-clear S;
-S(2).a.b=1;
-assert_checkequal(S(1).a, []);
-assert_checkequal(S(2).a.b, 1);
-clear S;
-S(2).a(3).b=1;
-assert_checkequal(S(1).a, []);
-assert_checkequal(S(2).a.b, list([],[], 1));
-//
-S = struct("a", "1");
-S(1,1,2).a = "2";
-S(1).b = 2;
-assert_checkequal(S.a, list("1", "2"));
-assert_checkequal(S.b, list(2, []));
-S(2).a=5;
-assert_checkequal(S.a, list("1", 5));
-S(1,3,2).a="foo";
-assert_checkequal(S.a, list("1",[],[],5,[],"foo"));
-assert_checkequal(S.b, list(2,[],[],[],[],[]));
-S(1,3,2,2).b=[33 44];
-assert_checkequal(S.a, list("1",[],[],5,[],"foo" ,[],[],[],[],[],[]));
-assert_checkequal(S.b, list(2,[],[],[],[],[],[],[],[],[],[],[33,44]));
-clear S;S(1,2).a=3;S(3).a=44 ;
-assert_checkequal(S.a, list([],3,44));
-clear S;S.a=3;S(3).a=44;
-assert_checkequal(S.a, list(3,[],44));
-clear S;S(4).a=3;
-assert_checkequal(S.a, list([],[],[],3));
-clear S;
-S(1).a(1,1:4)=1;
-S(1).b(1:3)=5;
-assert_checkequal(S.a, [1,1,1,1]);
-assert_checkequal(S.b, [5;5;5]);
-S=struct();
-S.b(1,1)=3;
-assert_checkequal(S.b, 3);
-clear S;
-S(1,1).a(1,1:4)=1;
-S(1,1).b(1,1:3)=5;
-assert_checkequal(S.a, [1,1,1,1]);
-assert_checkequal(S.b, [5,5,5]);
-clear S;
-S(1,1).a(1:4)=1;
-S(1,1).b(1:3)=5;
-assert_checkequal(S.a, [1;1;1;1]);
-assert_checkequal(S.b, [5;5;5]);
-clear S;
-S(1,2).a(1:4)=1;
-S(2,1).b(1:3)=5;
-assert_checkequal(S.a, list([],[],[1,1,1,1]',[]));
-assert_checkequal(S.b, list([],[5,5,5]',[],[]));
-clear S;
-S(1,2).a(2).b(1,2)=1;
-assert_checkequal(S(1).a, []);
-assert_checkequal(S(2).a.b, list([],[0,1]));
-clear S;
-S(1,2).a(1,2).b(1,2,3)=4;
-assert_checkequal(S(1).a, []);
-assert_checkequal(S(2).a.b, list([], matrix( [0;0;0;0;0;4], [1 2 3])));
-tl=tlist(["ltype" "f1"], 12);
-assert_checkequal(typeof(tl), "ltype");
-tl(1) = 12;
-assert_checkequal(typeof(tl), "list");
index 5bae097..70dfdd8 100644 (file)
@@ -5,6 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- CLI SHELL MODE -->
+// <-- NO CHECK REF -->
 
 // test des insertions dans les listes
 a=1;b=3;c=2;d=[1 2 3];e=[3 4 5];f=[10;20];g=[44 55];
diff --git a/scilab/modules/data_structures/tests/unit_tests/lstops.dia.ref b/scilab/modules/data_structures/tests/unit_tests/lstops.dia.ref
deleted file mode 100644 (file)
index 1e28d67..0000000
+++ /dev/null
@@ -1,111 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) ????-2008 - INRIA
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-// <-- CLI SHELL MODE -->
-funcprot(0);
-//-----------------------
-//-- extractions tests --
-//-----------------------
-l=list(1,2,-4);
-if l(1)<>1 then bugmes();quit;end
-if l(3)<>-4 then bugmes();quit;end
-[x1,x2]=l([1 3]);
-if x1<>l(1)|x2<>l(3) then bugmes();quit;end
-[x2,x1]=l([3 1]);
-if x1<>l(1)|x2<>l(3) then bugmes();quit;end
-[x1,x2]=l([1;3]);
-if x1<>l(1)|x2<>l(3) then bugmes();quit;end
-[x2,x1]=l([3;1]);
-if x1<>l(1)|x2<>l(3) then bugmes();quit;end
-[x1,x2,x3]=l(:);
-if x1<>l(1)|x2<>l(2)|x3<>l(3) then bugmes();quit;end
-//with full tlists
-l=tlist(["t","a","b","c"],1,-2,5);
-if l(2)<>1 then bugmes();quit;end
-if l(4)<>5 then bugmes();quit;end
-[x1,x2]=l([2 4]);
-if x1<>l(2)|x2<>l(4) then bugmes();quit;end
-[x2,x1]=l([4 2]);
-if x1<>l(2)|x2<>l(4) then bugmes();quit;end
-if l("a")<>1 then bugmes();quit;end
-if l("c")<>5 then bugmes();quit;end
-[x1,x2]=l(["a" "c"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-[x2,x1]=l(["c" "a"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-[x1,x2]=l(["a";"c"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-[x2,x1]=l(["c";"a"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-//with partial tlists (no elements formal names)
-l=tlist("t",1,-2,5);
-deff("[f1,f2,f3,f4,f5,f6,f7]=%t_e(i,j,f)",[
-"nams=[''a'',''b'',''c''];"
-"for k=1:prod(size(i))";
-"   kf=find(i(k)==nams);";
-"   if kf==[] then error(""%s: Invalid index.\n""),end;"
-"   execstr(''f''+string(k)+''=j(kf+1)'');"
-"   end;"])
-if l(2)<>1 then bugmes();quit;end
-if l(4)<>5 then bugmes();quit;end
-[x1,x2]=l([2 4]);
-if x1<>l(2)|x2<>l(4) then bugmes();quit;end
-[x2,x1]=l([4 2]);
-if x1<>l(2)|x2<>l(4) then bugmes();quit;end
-if l("a")<>1 then bugmes();quit;end
-if l("c")<>5 then bugmes();quit;end
-[x1,x2]=l(["a" "c"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-[x2,x1]=l(["c" "a"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-[x1,x2]=l(["a";"c"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-[x2,x1]=l(["c";"a"]);
-if x1<>l("a")|x2<>l("c") then bugmes();quit;end
-// extraction inside a input argument list
-a=list(1,2,3,4);
-if or(list(a(1:2))<>list(1,2)) then bugmes();quit;end
-if type(list(a(1:2)))<>15 then bugmes();quit;end
-deff("[a,b]=foo(x,y)","a=x;b=y")
-[u,v]=foo(a(1:2));if u<>a(1)|v<>a(2) then bugmes();quit;end
-deff("[a]=foo(x,y)","a=x+y")
-if abs(foo(a(1:2)))<>3 then bugmes();quit;end
-//---------------------
-//-- insertion tests --
-//---------------------
-l=list(2,"a",-1);
-l(1)=[1 2];
-if l<>list([1 2],"a",-1) then bugmes();quit;end
-l(1)=33;
-if l<>list(33,"a",-1) then bugmes();quit;end
-l(1)=33;
-if l<>list(33,"a",-1) then bugmes();quit;end
-l(0)=1.25;
-if l<>list(1.25,33,"a",-1) then bugmes();quit;end
-l(5)=[1 2 3];
-if l<>list(1.25,33,"a",-1,[1 2 3]) then bugmes();quit;end
-l(3)=null();
-if l<>list(1.25,33,-1,[1 2 3]) then bugmes();quit;end
-l(3)=null();
-if l<>list(1.25,33,[1 2 3]) then bugmes();quit;end
-l(4)=null();
-if l<>list(1.25,33,[1 2 3]) then bugmes();quit;end
-l(0)=null();
-if l<>list(1.25,33,[1 2 3]) then bugmes();quit;end
-l=tlist("t",2,"a",-1);
-l(2)=[1 2 3];
-if %l_n_l(l,tlist("t",[1 2 3],"a",-1)) then bugmes();quit;end
-l(2)=33;
-if %l_n_l(l,tlist("t",33,"a",-1)) then bugmes();quit;end
-l(2)=33;
-if %l_n_l(l,tlist("t",33,"a",-1)) then bugmes();quit;end
-l(4)=[1 2];
-if %l_n_l(l,tlist("t",33,"a",[1,2])) then bugmes();quit;end
-l(2)=null();
-if %l_n_l(l,tlist("t","a",[1,2])) then bugmes();quit;end
-l(1)=null();
-if %l_n_l(l,list("a",[1,2])) then bugmes();quit;end
-funcprot(1);
index 3898ac1..8d7c921 100644 (file)
@@ -5,6 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- CLI SHELL MODE -->
+// <-- NO CHECK REF -->
 funcprot(0);
 
 //-----------------------
index 753cb0f..2ac27c0 100644 (file)
@@ -249,7 +249,7 @@ endfunction
 // This is the pattern for a comment line of the form "// blabla"
 pattern = "/\/\/.*/"
  pattern  = 
- /\/\/.*/
+  "/\/\/.*/"
 itxt = [
 "bla 1"
 "// bla 2"
index 5adcfdd..4fc67fe 100644 (file)
@@ -21,7 +21,7 @@ clear;
 funcprot(0);
 v0 = 0;// INITIAL CONDITIONS OF THE DIFFERENTIAL EQUATION
 u0 = 0;// INITIAL CONDITIONS OF THE DIFFERENTIAL EQUATION
-y0 = [v0;  u0]; 
+y0 = [v0;  u0];
 F = 1;  // system's parameters
 m = 1;  // system's parameters
 c = 0.5;  // system's parameters
index a7bab11..0caba67 100644 (file)
@@ -52,25 +52,18 @@ endfunction
 chdir(TMPDIR);
 libn=ilib_for_link('dgesvtst','dgesvtst.f',[],'f');
    Generate a loader file
-
    Generate a Makefile
-
    Running the Makefile
-
    Compilation of dgesvtst.f
-
    Building shared library (be patient)
-
    Generate a cleaner file
-
 exec loader.sce;
 Shared archive loaded.
 Link done.
 chdir(curdir),
  ans  =
-  T  
+  T
 n=44;
 A=eye(n,n);B=(1:n)';
-[X, LU, IPIV, INFO] = msolve(A,B); 
+[X, LU, IPIV, INFO] = msolve(A,B);
 if norm(A*X-B)>1d-15 then bugmes();quit;end
index f2d4d65..21994fb 100644 (file)
@@ -13,7 +13,7 @@ if getos() == 'Windows' then
            '  @echo ------------------------------------------',
            ' '];
   mputl(txt,TMPDIR+'/makefile.mak');
-  current_dir = pwd();
+  current_dir = pwd();  
   cd TMPDIR;
   files = G_make(['',''],'message');
   cd(current_dir);
index 69a1bfc..cab56d6 100644 (file)
@@ -23,18 +23,12 @@ mputl(C,TMPDIR+'/schur_test/mytest.c');
 //build and link
 lp=ilib_for_link('mytest','mytest.c',[],'c');
    Generate a loader file
-
    Generate a Makefile
-
    Running the Makefile
-
    Compilation of mytest.c
-
    Building shared library (be patient)
-
    Generate a cleaner file
-
-link(lp,'mytest','c'); 
+link(lp,'mytest','c');
 Shared archive loaded.
 Link done.
 //run it
index 9e44bf5..5cb6e65 100644 (file)
@@ -74,7 +74,7 @@ expecteddiv = [
 %nan   %nan    %nan    %nan    %nan    %nan    %nan];
 // See http://bugzilla.scilab.org/show_bug.cgi?id=2409
 // We must use imult(%inf) to get the mathematical number i * inf
-// since %i * %inf produces imult(%inf), as expected by the 
+// since %i * %inf produces imult(%inf), as expected by the
 // intermediate multiplication 0*%inf = %nan.
 expectedsqrt = [
 imult(%inf)
index fc4259c..3a2002c 100644 (file)
@@ -11,8 +11,7 @@ c = jcompile("TestDirectBuffer",["import java.nio.DoubleBuffer;";
 "for (int i = 0; i < x.capacity(); i++) x.put(i, x.get(i) + 1);";
 "}";
 "}"])
- c  =
+ c  = 
 class TestDirectBuffer
 a = 1:10000;
 b = a + 1; // only used to compare with the following...
index a31c65e..9b73af1 100644 (file)
@@ -16,6 +16,7 @@
 // ================== Test 1 ==================
 cd('\');
 if getos() == 'Windows' 
+  
        if ~or(getdrives() == pwd()) then bugmes();quit;end
 else
        if pwd() <> '/' then bugmes();quit;end
index f59b432..61965e1 100644 (file)
@@ -28,5 +28,4 @@ jremove ImageIO URL url bi
 // Check if the image is not fully white
 assert_checkfalse(and(data == (uint32(2^32 - 1))))
  ans  =
-  T  
+  T
index 482540d..59bafce 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // plot();xs2png(0,TMPDIR+filesep()+'toto.png') crashs !!!
-//
+// 
 plot();
 ierr = execstr('xs2png(0,TMPDIR+filesep()+''bug_4231.png'');','errcatch');
 if fileinfo(TMPDIR+filesep()+'bug_4231.png') == [] then bugmes();quit;end
index c9a564e..7ca5474 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Exporting an empty figure crashes Scilab
-//
+// 
 figure(0);
 xs2eps(0, TMPDIR + 'name');
 // should not crash
index 0948ecd..2d76729 100644 (file)
@@ -13,7 +13,7 @@
 //
 // <-- Short Description -->
 // If the extension is not provided, some functions adds the extension, some others don't
-// 
+//
 plot3d();
 filename=TMPDIR+"/nonreg_test_bug4944";
 f=gcf();
index e0b544f..1509760 100644 (file)
@@ -15,6 +15,7 @@ fig = gcf();
 figIndex =fig.figure_id;
 // check that file size is greater than 10K
 minimumSize = 10000;
+// bitmap export
 // gif format
 xs2gif(figIndex, TMPDIR+"/textExport.gif")
 fileSize = fileinfo(TMPDIR+"/textExport.gif");
index 88495ef..82cb21a 100644 (file)
@@ -14,7 +14,7 @@ plot3d;
 fig = gcf();
 figIndex =fig.figure_id;
 // vectorial export
-// check that file size is greater than 10M
+// check that file size is greater than 100K
 // increase minimum size
 minimumSize = 100000;
 xs2ps(figIndex, TMPDIR+"/textExport.ps")
index e4c81c8..b211fb8 100644 (file)
@@ -11,8 +11,8 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=1134
 //
 // <-- Short Description -->
-// strf="120" in grayplot disables graphics title
-// strf= "122" doesn't create a box without tics
+// strf="120" in grayplot disables graphics title 
+// strf= "122" doesn't create a box without tics 
 grayTitle = ["My grayplot"; "with strf=120"];
 x = 1:10;
 m = rand(10,10);
index 5c90a75..ebc5ffd 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Legends are not updated when observed polylines are modified.
-//
+// 
 // create a polylines
 plot(1:10);
 p1 = gce();
index 9ee64de..4cbab81 100644 (file)
@@ -17,18 +17,17 @@ H = [
     8.    0.1006
     9.    0.0982
 ]
- H  =
-    0.    0.1007  
-    1.    0.0965  
-    2.    0.0996  
-    3.    0.1019  
-    4.    0.0974  
-    5.    0.1019  
-    6.    0.0977  
-    7.    0.1055  
-    8.    0.1006  
-    9.    0.0982  
+ H  = 
+   0.   0.1007
+   1.   0.0965
+   2.   0.0996
+   3.   0.1019
+   4.   0.0974
+   5.   0.1019
+   6.   0.0977
+   7.   0.1055
+   8.   0.1006
+   9.   0.0982
 scf();
 bar(H(:,1),H(:,2));
 scf();
index 2cc3936..835bce3 100644 (file)
@@ -17,6 +17,6 @@
 clf()
 plot();
 rect=[3 -2 7 10];
-zoom_rect(rect); 
+zoom_rect(rect);
 assert_checktrue(execstr("unzoom(gcf())","errcatch")==0);
 delete();
index 7955ad8..f47e442 100644 (file)
@@ -11,7 +11,7 @@
 // http://bugzilla.scilab.org/13402
 //
 // <-- Short Description -->
-// Bounding boxes of xarcs were not correct   
+// Bounding boxes of xarcs were not correct
 xarc(0, 0, 2, 1, 64 * 0, 64 * 360);
 a = gca();
 assert_checkequal(a.data_bounds, [0 -1 ; 2 0]);
index 0cfa278..8f68251 100644 (file)
@@ -57,7 +57,6 @@ tmp = gettext("Wrong type for "'%s"' property: An empty matrix or a tlist expect
 errmsgFromSetBorder = msprintf(tmp, "border");
 tmp =  gettext("%s: Could not set property "'%s"'.\n");
 errmsgFromUicontrol = msprintf(tmp, "uicontrol", "border");
-
 checkValues = list("border", [1, 2, 3, 4], [1 ,2; 1, 2], ...
 [1:10], [1:10]', list(), ...
 list(1, 2, 3), ...
index 59300a1..2a1794d 100644 (file)
@@ -15,4 +15,4 @@
 // Optional arguments did not work properly. e.g colorbar(1,10,fmt="%d").
 colorbar(1,10,fmt="%d");
 colorbar(1,10,[1,10],fmt="%d");
-colorbar(1,10,fmt="%d", colminmax=[1,10]);
\ No newline at end of file
+colorbar(1,10,fmt="%d", colminmax=[1,10]);
index dd1d647..08c9d3e 100644 (file)
@@ -16,7 +16,7 @@ l = light();
 l.userdata = "Source 1";
 l.tag = "LS1";
 l
-l  = 
+ l  = 
 Handle of type "Light" with properties:
 =======================================
 parent: Axes
index 9773921..7afbb40 100644 (file)
@@ -14,7 +14,7 @@
 //    Bug detected in 3.1.1 under Windows XP.
 //    Bug relative to function rotate
 //
-//    A positive angle corresponds to a clockwise rotation, then in the
+//    A positive angle corresponds to a clockwise rotation, then in the 
 //    negative mathematical way.
 //
 //    Jacques-Deric
index 9d34a86..809de36 100644 (file)
@@ -30,15 +30,15 @@ hs10.data (2,1) = 0.70;  // x2
 hs10.data (2,2) = 0.45;  // y2
 hs10.data,
  ans  =
-    1.    0.6    0.
-    0.7   0.45    0.
+   1.    0.6    0.
+   0.7   0.45   0.
 ha.rotation_angles = [0,270];
 hs10.data (1,3) =-0.30;  // z1 
 hs10.data (2,3) =-0.40;  // z2
 hs10.data,
  ans  =
-    1.    0.6
-    0.7   0.45
+   1.    0.6 
+   0.7   0.45
 ha.rotation_angles = [0,0];
 reference = [ 1, 0.6, -0.3 ; 0.7, 0.45, -0.4 ] ;
 // check that the segment z coordinates are modified
index 19848e3..87ff270 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // If parametric 3d curve values are out of given ebox of 3d axes, this curve values are netherveless plotted.
-//
+// 
 xv = 1:10;
 yv = rand(1, length(xv))*20-10;
 param3d1(xv, yv, ...
index 5d9055a..0be6963 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // zoom_box properties only applies on X and Y axis.
-//
+// 
 xSize = 10;
 x = 1:xSize;
 plot3d(x,x,rand(xSize, xSize));
index 0d5902c..b984153 100644 (file)
@@ -13,7 +13,7 @@
 // <-- Short Description -->
 //    Scilab 4.0-RC1
 //    Different default behavior of xfrect and xfarc
-//    xfrec does not draw the limit of the rectangle
+//    xfrec does not draw the limit of the rectangle 
 //    xfarc draws the limit of the circle
 //
 //    I don't know which is right and which is wrong, but there is an obvious
index a5f3f77..7c672f8 100644 (file)
@@ -10,6 +10,6 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=174
 //
 // <-- Short Description -->
-//   Sur des images de grandes tailles, Matplot trace plein de lignes blanches, ce qui est assez genant.
+//   Sur des images de grandes tailles, Matplot trace plein de lignes blanches, ce qui est assez genant. 
 // <-- TEST WITH GRAPHIC -->
 Matplot(3*rand(64,64));
index 7064ece..9dff4f0 100644 (file)
@@ -19,7 +19,7 @@ e=gce();
 f=e.data;
 TL = tlist(["3d" "x" "y" "z" "color"],f.x,f.y,f.z,6*rand(f.z)); // random color matrix
 h=gce(); //get handle on current entity (here the surface)
-f=gcf();//get the handle of the parent figure
+f=gcf();//get the handle of the parent figure   
 f.color_map=hotcolormap(512);
 c=[1:400,1:400];
 TL.color = [c;c+1;c+2;c+3];
index 4f97c98..ccd6ebd 100644 (file)
@@ -11,7 +11,7 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=1873
 //
 // <-- Short Description -->
-// grid space between dash dash line elements is filled with white
+// grid space between dash dash line elements is filled with white 
 // background color.
 xv = 1:10; yv=xv; s = rand(length(xv), length(yv));
 min_z = min(s); max_z = max(s);
index 78b4873..e91e43d 100644 (file)
@@ -19,4 +19,4 @@ X=[0;1;1;1;1;0;0;0];
 Y=[0;0;0;1;1;1;1;0];
 g=color("red");
 xpolys(X,Y,g*ones(1,8));
-// the top segment of the axes box was red and the right one is black.
+// the top segment of the axes box was red and the right one is black.   
index a26fd5e..3bf691b 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // "contour2d" prints level numbers partially outside the rect.
-//
+// 
 bounds = [1,1,10,10];
 contour2d(1:10,1:10,rand(10,10),5,rect=bounds);
 // check that texts created by contour2d are inside the box
index 1d11f67..37692d0 100644 (file)
 // Display error when merging several 3d polylines.
 // In 3d mode, some unwanted segment are drawn from the polylines.
 // In 2d mode, some unwanted curves somtimes appears.
-//
+// 
 x = 1:3 ;
 param3d(x,x,x) ;
 y = 2:5 ;
 param3d(y,y,y+1);
 a =gca() ;
 a.rotation_angles = [60,10] ; // bug in 3D
-a.view = "2d" ; // bug in 2D
+a.view = "2d" ; // bug in 2D   
 // Check that there is only two displayed lines.
index b10b3a2..175358a 100644 (file)
@@ -16,11 +16,11 @@ data=ones(30000,100);
 subplot(231)
 plot(data)
 xgrid
-//now 
+//now
 subplot(232)
 plot(data)
 xgrid
-//and then until 
+//and then until
 subplot(236)
 xgrid
 plot(data)
index 69db65b..400af66 100644 (file)
@@ -11,8 +11,8 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=2255
 //
 // <-- Short Description -->
-// plot command fails to verify that x and y data have the same length in certain cases.
-//
+// plot function fails to verify that x and y data have the same length in certain cases.
+// 
 err = execstr('plot(ones(1,2048),ones(1,1024))','errcatch','n');
 // should produce an error message
 if (err == 0) then bugmes();quit;end
index 75e344f..97e03e4 100644 (file)
@@ -11,8 +11,8 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=2365
 //
 // <-- Short Description -->
-// plot3d3 removes ticks.
-//
+// plot3d3 without flags option removes ticks.
+// 
 plot3d3( [ 0,0; 10,10 ],[ 1,2;3,4 ],[ 0,2; 0,2 ] );
 // check that ticks are present
 axes = gca();
index fb6b053..d1a5fa2 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // plot3d hangs scilab when plotting a matrix full with NaN
-//
+// 
 dummy = ones(10,10);
 dummy2 = dummy*%nan;
 plot3d(1:10,1:10,dummy2);
index 28c2f0d..4401b33 100644 (file)
@@ -13,7 +13,7 @@
 // <-- Short Description -->
 // Change the <figure_handle>.figure_name property not modify the window title like
 // with scilab-4.1.2
-//
+// 
 name = 'Something';
 my_figure_handle             = scf(10);
 my_figure_handle.figure_name = name;
index 400d640..1fb7ee8 100644 (file)
@@ -22,7 +22,7 @@ curFig = gcf();
 curFig.immediate_drawing = "on";
 // evaluation of f will fail
 // it use to keep current figure in drawlater mode
-// plot(x,f)
+//plot(x,f)
 //the error will not be printed in the console
 ierr = execstr('plot(x,f)','errcatch');
 plot(x,x)
index bd7b143..552a9ea 100644 (file)
@@ -11,7 +11,7 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=2813
 //
 // <-- Short Description -->
-//
+// 
 // - xtitle clips y axis label
 // - xtitle adds @ in labels instead of displaying them on several lines
 axes = gca();
index 0409765..a0e2c28 100644 (file)
@@ -19,7 +19,7 @@ drawlater;
 clf();
 ax=gca();
 ax.data_bounds=[-180,-50;180,90];
-ax.box='on'; 
+ax.box='on';
 ax.axes_visible=["on","on"];
 ax.tight_limits="on";
 a=5*ones(51,50);
index cb06acc..08fa91e 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // plzr demo not correct
-//
+// 
 x=0:0.1:4*%pi;
 subplot(2,1,1);
 plot2d(x,[sin(x)' sin(2*x)'],leg="sin x@sin 2x");
index cd22e58..a8b5325 100644 (file)
@@ -13,9 +13,9 @@
 // <-- Short Description -->
 // Set font_size with a big value freeze Scilab
 alphabet=["a" "b" "c" "d" "e" "f" "g" ..
-          "h" "i" "j" "k" "l" "m" "n" ..
-          "o" "p" "q" "r" "s" "t" "u" ..
-          "v" "w" "x" "y" "z"];
+"h" "i" "j" "k" "l" "m" "n" ..
+"o" "p" "q" "r" "s" "t" "u" ..
+"v" "w" "x" "y" "z"];
 s = scf();
 a = gca();
 a.view = "3d";
@@ -25,11 +25,11 @@ e = gce();
 e.font_size = 100;
 // rotate
 for i=1:360,
-  a.rotation_angles(2) = i;
+    a.rotation_angles(2) = i;
 end
 // use fractional fonts
 e.fractional_font = "on";
 // rotate again
 for i=1:360,
-  a.rotation_angles(2) = i;
+    a.rotation_angles(2) = i;
 end
index 230b14c..d683310 100644 (file)
@@ -11,7 +11,7 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=2934
 //
 // <-- Short Description -->
-//In the "Bezier surface test" demo, the graphics titles are inverted compared to Scilab 4.1.2
+//In the "Bezier surface test" demo, the graphics titles are inverted compared to Scilab 4.1.2 
 subplot(211);
 a = gca();
 a.title.text = "top axes";
index b62b8d6..80cf03c 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // The demo "Surface with hole 1" is not colorized (just blue, not multi-colored as in Scilab 4.1.2)
-//
+// 
 t     = linspace(-%pi,%pi,40);
 z     = sin(t)'*cos(t);
 z1    = find(abs(z) > 0.5);
index 6dae694..5d8a047 100644 (file)
@@ -5,6 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- TEST WITH GRAPHIC -->
+// <-- NO CHECK ERROR OUTPUT -->
 // <-- Non-regression test for bug 2953 -->
 //
 // <-- Bugzilla URL -->
@@ -12,7 +13,7 @@
 //
 // <-- Short Description -->
 // we lost axes with plot3d and box = 2
-t=[0:0.1:2*%pi]'; z=sin(t)*cos(t'); 
+t=[0:0.1:2*%pi]'; z=sin(t)*cos(t');
 f=gcf();f.color_map=hsvcolormap(64);
 plot3d1(t,t,z,35,45,"X@Y@Z",[-2,2,2])
 // with box = 2 we should have only the back thriedron drawn 
index dd9c825..ecd64c0 100644 (file)
@@ -24,8 +24,7 @@ plot3d(x,x,z)
 a = gca();
 a.children(1).hiddencolor
  ans  =
-    4.  
+   4.
 a.children(1).hiddencolor = 5;
 // check that no hidden facets appears.
 // Might be updated when image processing will be integrated in Scilab.
index a712bde..852db99 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // plot3d() => seg fault, occurs rarely.
-//
+// 
 for i=1:100,
   plot3d();
 end
index e3b77c9..2fe8105 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // The edit/current axes properties menu of the graphic window fails
-//
+// 
 // create a figure
 scf(0);
 // figure property
index a14cf9f..ddb3c51 100644 (file)
@@ -13,5 +13,4 @@
 // <-- Short Description -->
 // Misaligned ticks labels in colorbar.
 colorbar(-200,100)
-// Now expand the window to see ticks along the color bar
-// Labels should be in front of them.
+// Labels should be here with ticks
index 3d2fc06..4e756d3 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Axes box drawign disappeared in histplot demo.
-//
+// 
 // first check axes
 subplot(2,2,1);
 histplot();
index 917efdb..71f147d 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // The "symbol" font (number 1) is broken
-//
+// 
 xstring(0.2,0.2,['abcdefghijklmnopqrstuvwxyz';'ABCDEFGHIJKLMNOPQRSTUVWXYZ']);
 e=gce();
 e.font_style=1;
index 0e3bf4b..897a4b5 100644 (file)
 //    Scilab 5
 //    When sca() is called with a bad number of argument, the returned error is not clear at all.
 //     -->sca()
-//  !--error 4
+//  !--error 4 
 //  Undefined variable: h
 //
-//  at line       2 of function sca called by :
+//  at line       2 of function sca called by :  
 //  sca()
 execstr("sca();","errcatch");
 if lasterror() <> msprintf(gettext("%s: Wrong number of input arguments: %d expected.\n"), "sca",1) then bugmes();quit;end
index c6dc8c9..3dbcf7d 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // figure.axes_size and figure.figure_size might not be updated immediately.
-// 
+//
 // Test 1 : axes_size, auto_resize = "on"
 // ===========================
 // Create a default figure
index 7c7fab8..3f116e2 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // plot2d(), followed by legends produce an unexpected error.
-//
+// 
 plot2d();
 legends(string([1:3]),[-1 -2 3],1);
 // plot2d used to corrupt the stack and legends was producing an error
index 86e03ab..38a1e2b 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // After open and close a graphic window, scilab is crashing if a new window is opened.
-//
+// 
 plot3d();
 delete(gcf());
 plot3d();
index ac65c63..b25c7a8 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Graphic windows created by figure are unable to display plots.
-//
+// 
 h1 = figure(1);
 plot([1,2,5,4,5,2,1]);
 // check that the plot is visible
index b9ffc5d..a67ebb1 100644 (file)
@@ -13,7 +13,7 @@
 //
 // <-- Short Description -->
 // When using grayplot, you cannot have different dimensions in entry.
-// 
+//
 x=1:2000; y=1:1000; m=rand(1000,2000);
 grayplot(x,y,m');
 // used to crash violently
index 8de6436..8e4736e 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Scilab freezes when executing a combination of "eventhandler", "xchange" and "plot".
-//
+// 
 function follow(win,x,y,ibut)
   [xx,yy]=xchange(x,y,"i2f");
 endfunction
index 6062e3f..613bb0d 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Wrong setting of figure_position in the default figure.
-//
+// 
 defaultFig = gdf();
 defaultPos = [200,300];
 defaultFig.figure_position = defaultPos;
index f9d9bc1..6e88de2 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // After using surf giving a stacksize error, the figure saty in drawlater mode.
-//
+// 
 fig = gcf();
 fig.immediate_drawing = "on";
 // will require too much stack
index 6da1028..a45e0b0 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // legend only works when the number of strings equals the number of polylines
-//
+// 
 x = 1:10;
 plot(x,x);
 p1 = gce();
index 5a93001..dbf8605 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // delete() always modify the current object handle.
-//
+// 
 x = 1:10;
 // create two polylines
 plot(x,x);
index cc7b1c3..16b3886 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Graphic demos launched using functions without arguments (such as plot3d()) may modify variables.
-//
+// 
 f = gdf();
 backupF = f;
 x = 10;
index 72f53e9..f11693d 100644 (file)
@@ -12,9 +12,9 @@
 //
 // <-- Short Description -->
 // plot2d overrides Y axis location set in default axes.
-//
+// 
 x = [0:0.1:2*%pi]';
-da = gda(); // get the handle of the model axes
+da = gda(); // get the handle of the model axes 
 da.x_location = "origin";
 da.y_location = "origin";
 plot2d(x-2,sin(x))
index 5638993..86e6b2d 100644 (file)
@@ -11,8 +11,8 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=4106
 //
 // <-- Short Description -->
-// bar and barh overrides drawlater/drawnow mode.
-//
+// bar and barh override drawlater/drawnow mode.
+// 
 x = 1:10;
 curFig = gcf();
 // drawlater
index e0a0c97..7f96c54 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // move called with an already deleted handle crashes Scilab.
-//
+// 
 xpoly(1,1);
 point = gce();
 delete(point); // the handle is no longer valid
index dc27d6e..f6e618d 100644 (file)
@@ -12,7 +12,7 @@
 //
 // <-- Short Description -->
 // Creating an one-colored Sgrayplot generate some exceptions and does not plot anything.
-//
+// 
 x=-10:10; y=-10:10; m = zeros(21,21);
 for ix=1:21
   for iy=1:21
index 79fb188..a842bfe 100644 (file)
@@ -22,4 +22,4 @@ v0 = a.x_ticks.labels;
 drawaxis(x=a.x_ticks.locations,y=0.5,dir="u",tics="v",val=v0);
 e=gce();
 v1="$"+v0+"$";
-e.tics_labels=v1'; 
+e.tics_labels=v1';
index 719b65a..7b98841 100644 (file)
@@ -11,7 +11,7 @@
 // http://bugzilla.scilab.org/5844
 //
 // <-- Short Description -->
-// grayplot had not logflag option
+// grayplot had not a logflag option
 x=1:10;
 y=1:10;
 m=rand(10,10);
index 43239f1..e4c0743 100644 (file)
@@ -18,8 +18,7 @@ p=e.children(1);
 c=captions(p,'foo');
 c.background //-->-2 ok
  ans  =
-  - 2.  
+  -2.
 p.foreground=color(200,128,33);
 // The caption's background color should remain equal to -2
 if (c.background <> -2) then bugmes();quit;end
index 4c31653..16a47bd 100644 (file)
@@ -5,6 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- TEST WITH GRAPHIC -->
+// <-- NO CHECK ERROR OUTPUT -->
 // <-- Non-regression test for bug 6720 -->
 //
 // <-- Bugzilla URL -->
index c5cec72..30288d2 100644 (file)
@@ -20,4 +20,4 @@ v0=a.x_ticks.labels;
 drawaxis(x=a.x_ticks.locations,y=0.5,dir="u",tics="v",val=v0);
 e=gce();
 v1="$"+v0+"$";
-e.tics_labels=v1'; 
+e.tics_labels=v1';
index 0fdf7e7..593580b 100644 (file)
@@ -14,7 +14,7 @@
 //
 t=linspace(0,%pi,20);
 drawlater()
-clf();plot2d(t,[cos(t'),cos(2*t'),cos(3*t')],[-5,2 3]);  
+clf();plot2d(t,[cos(t'),cos(2*t'),cos(3*t')],[-5,2 3]);
 ax=gca();
 C=ax.children.children;
 hl=legend(['cos(t)';'cos(2*t)';'cos(3*t)']);
index 74c3af7..dd403f9 100644 (file)
@@ -13,7 +13,7 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=7998
 //
 // <-- Short Description -->
-//%h_get failed with heterogen handle matrix
+//%h_get failed on heterogeneous handle matrix
 cols = [1 2 3 4 5];
 lgd = [];
 for k = 1 : 5
index 41ce1eb..c6cf921 100644 (file)
@@ -13,7 +13,7 @@
 // http://bugzilla.scilab.org/show_bug.cgi?id=8786
 //
 // <-- Short Description -->
-// When entering wrong input arguments in getcolor function..the error message is very strange...
+// When entering wrong input arguments in 'getcolor' function, the error message has no sense.
 ierr = execstr("getcolor(10)", "errcatch");
 errmsg = lasterror();
 if ierr==0 then bugmes();quit;end
index 8306e66..038c18e 100644 (file)
@@ -13,32 +13,25 @@ Matplot([1 2 3;4 5 6])
 e = gce();
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-  T  
+  T
 assert_checkequal(e.children, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.visible, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.data, [1, 2, 3 ; 4, 5, 6])
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_state, "clipgrf")
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_box, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.user_data, [])
  ans  =
-  T  
+  T
 // used to crash Scilab
 clf();
 Matplot(1:32);
index 98199e9..e587785 100644 (file)
@@ -11,57 +11,43 @@ xarc(-1,1,2,2,0,90*64);
 e = gce();
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-
   T
 assert_checkequal(e.children, [])
  ans  =
-
   T
 assert_checkequal(e.thickness, 1)
  ans  =
-
   T
 assert_checkequal(e.line_style, 1)
  ans  =
-
   T
 assert_checkequal(e.line_mode, "on")
  ans  =
-
   T
 assert_checkequal(e.fill_mode, "off")
  ans  =
-
   T
 assert_checkequal(e.foreground, -1)
  ans  =
-
   T
 assert_checkequal(e.background, -2)
  ans  =
-
   T
 assert_checkequal(e.data, [-1 1 2 2 0 90])
  ans  =
-
   T
 assert_checkequal(e.visible, "on")
  ans  =
-
   T
 assert_checkequal(e.arc_drawing_method, "lines")
  ans  =
-
   T
 assert_checkequal(e.clip_state, "off")
  ans  =
-
   T
 assert_checkequal(e.clip_box, [])
  ans  =
-
   T
 assert_checkequal(e.user_data, [])
  ans  =
-
   T
index ba592bf..bb2f14f 100644 (file)
@@ -15,12 +15,11 @@ a = [1 1;
      2 1;
      2 2;
      1 2]
- a  =
-    1.    1.  
-    2.    1.  
-    2.    2.  
-    1.    2.  
+ a  = 
+   1.   1.
+   2.   1.
+   2.   2.
+   1.   2.
 x = a(:,1);
 y = a(:,2);
 triangle = [1 1 2 3 4 0];
index c129f67..26f04de 100644 (file)
@@ -7,7 +7,7 @@
 // <-- TEST WITH GRAPHIC -->
 // Create a default figure
 function resizeMe()
-  disp("resize");
+    disp("resize");
 endfunction
 f = scf();
 assert_checkequal(f.resizefcn, "");
index fb0c897..a840dad 100644 (file)
@@ -11,8 +11,7 @@ a = gca();
 e = gce();
 assert_checkequal(e, a)
  ans  =
-  T  
+  T
 plot(1:10);
 e = gce();
 assert_checkequal(e.type, "Compound");
index 6becea3..99bae9b 100644 (file)
@@ -12,48 +12,38 @@ xrect(-1,1,2,2);
 xarc(-0.5,0.5,2,2,0,360*64);
 assert_checkequal(a.children(1).type, "Arc")
  ans  =
-  T  
+  T
 assert_checkequal(a.children(2).type, "Rectangle")
  ans  =
-  T  
+  T
 e = gce();
 assert_checkequal(e.type, "Arc")
  ans  =
-  T  
+  T
 arc_child=a.children(1);
 rect_child=a.children(2);
 glue([arc_child, rect_child]);
 assert_checkequal(a.children(1).type, "Compound")
  ans  =
-  T  
+  T
 e = gce();
 assert_checkequal(e.type, "Compound")
  ans  =
-  T  
+  T
 assert_checkequal(e.children(1).type, "Rectangle")
  ans  =
-  T  
+  T
 assert_checkequal(e.children(2).type, "Arc")
  ans  =
-  T  
+  T
 unglue(e);
 assert_checkequal(a.children(1).type, "Rectangle")
  ans  =
-  T  
+  T
 assert_checkequal(a.children(2).type, "Arc")
  ans  =
-  T  
+  T
 e = gce();
 assert_checkequal(e.type, "Axes")
  ans  =
-  T  
+  T
index a550464..8a54642 100644 (file)
@@ -14,45 +14,34 @@ grayplot(x,y,z);
 e = gce();
 assert_checkequal(e.type, "Grayplot")
  ans  =
-  T  
+  T
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-  T  
+  T
 assert_checkequal(e.children, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.visible, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.data.x, x')
  ans  =
-  T  
+  T
 assert_checkequal(e.data.y, y')
  ans  =
-  T  
+  T
 assert_checkequal(e.data.z, z)
  ans  =
-  T  
+  T
 assert_checkequal(e.data_mapping, "scaled")
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_state, "clipgrf")
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_box, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.user_data, [])
  ans  =
-  T  
+  T
index 2877dbe..5da9802 100644 (file)
@@ -14,8 +14,7 @@ plot([0:10; 0:10; 0:10], [0:10; 0:0.5:5; 0:2:20]);
 // check polylines validity
 axes = gca();
 polylines = axes.children(1).children
- polylines  =
+ polylines  = 
 11 by 1 matrix of handles:
 ==========================
 Polyline 
@@ -35,17 +34,16 @@ assert_checkequal(test, [%t; %t; %t; %t; %t; %t; %t; %t; %t; %t; %t]);
 delete(polylines(3:7));
 // print validity
 test = is_handle_valid(polylines)
- test  =
-  T  
-  T  
-  F  
-  F  
-  F  
-  F  
-  F  
-  T  
-  T  
-  T  
-  T  
+ test  = 
+  T
+  T
+  F
+  F
+  F
+  F
+  F
+  T
+  T
+  T
+  T
 assert_checkequal(test, [%t; %t; %f; %f; %f; %f; %f; %t; %t; %t; %t]);
index 93546a8..c7a22ad 100644 (file)
@@ -12,9 +12,9 @@
 //   Check line_style correctness
 // Try this :
 for i = [1:11] do
-  plot([i,i]);
-  e=gce();
-  e=e.children();
-  e.line_style = i;
+    plot([i,i]);
+    e=gce();
+    e=e.children();
+    e.line_style = i;
 end
 // check that you have bottom to up : dash, dash dot, longdash dot, bigdash dot, bigdash longdash, dot, double dot, longblank dot, bigblank dot.
index 383dcf3..4d4c77a 100644 (file)
@@ -13,85 +13,65 @@ mesh(X,Y,Z);
 e = gce();
 assert_checkequal(e.type, "Fac3d")
  ans  =
-  T  
+  T
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-  T  
+  T
 assert_checkequal(e.children, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.visible, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.surface_mode, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.foreground, -1)
  ans  =
-  T  
+  T
 assert_checkequal(e.thickness, 1)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_mode, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_style, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_size_unit, "point")
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_size, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_foreground, -1)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_background, -2)
  ans  =
-  T  
+  T
 //assert_checkequal(e.data.x)
 //assert_checkequal(e.data.y)
 //assert_checkequal(e.data.z)
 //assert_checkequal(e.data.color)
 assert_checkequal(e.color_mode, 8)
  ans  =
-  T  
+  T
 assert_checkequal(e.color_flag, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.cdata_mapping, "scaled")
  ans  =
-  T  
+  T
 assert_checkequal(e.hiddencolor, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_state, "clipgrf")
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_box, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.user_data, [])
  ans  =
-  T  
+  T
index f38c028..1e1acd2 100644 (file)
@@ -13,113 +13,85 @@ xpoly(x,y);
 e = gce();
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-
   T
 assert_checkequal(e.children, [])
  ans  =
-
   T
 assert_checkequal(e.visible, "on")
  ans  =
-
   T
 assert_checkequal(e.data, [x; y]')
  ans  =
-
   T
 assert_checkequal(e.closed, "off")
  ans  =
-
   T
 assert_checkequal(e.line_mode, "on")
  ans  =
-
   T
 assert_checkequal(e.fill_mode, "off")
  ans  =
-
   T
 assert_checkequal(e.line_style, 1)
  ans  =
-
   T
 assert_checkequal(e.thickness, 1)
  ans  =
-
   T
 assert_checkequal(e.arrow_size_factor, 1)
  ans  =
-
   T
 assert_checkequal(e.polyline_style, 1)
  ans  =
-
   T
 assert_checkequal(e.foreground, -1)
  ans  =
-
   T
 assert_checkequal(e.background, -2)
  ans  =
-
   T
 assert_checkequal(e.interp_color_vector, [])
  ans  =
-
   T
 assert_checkequal(e.interp_color_mode, "off")
  ans  =
-
   T
 assert_checkequal(e.mark_mode, "off")
  ans  =
-
   T
 assert_checkequal(e.mark_style, 0)
  ans  =
-
   T
 assert_checkequal(e.mark_size_unit, "tabulated")
  ans  =
-
   T
 assert_checkequal(e.mark_size, 0)
  ans  =
-
   T
 assert_checkequal(e.mark_foreground, -1)
  ans  =
-
   T
 assert_checkequal(e.mark_background, -2)
  ans  =
-
   T
 assert_checkequal(e.x_shift, [])
  ans  =
-
   T
 assert_checkequal(e.y_shift, [])
  ans  =
-
   T
 assert_checkequal(e.z_shift, [])
  ans  =
-
   T
 assert_checkequal(e.bar_width, 0)
  ans  =
-
   T
 assert_checkequal(e.clip_state, "off")
  ans  =
-
   T
 assert_checkequal(e.clip_box, [])
  ans  =
-
   T
 assert_checkequal(e.user_data, [])
  ans  =
-
   T
index 7332a52..ca4d9ed 100644 (file)
@@ -11,81 +11,61 @@ xrect(-1,1,2,2)
 e = gce();
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-
   T
 assert_checkequal(e.children, [])
  ans  =
-
   T
 assert_checkequal(e.mark_mode, "off")
  ans  =
-
   T
 assert_checkequal(e.mark_style, 0)
  ans  =
-
   T
 assert_checkequal(e.mark_size_unit, "tabulated")
  ans  =
-
   T
 assert_checkequal(e.mark_size, 0)
  ans  =
-
   T
 assert_checkequal(e.mark_foreground, -1)
  ans  =
-
   T
 assert_checkequal(e.mark_background, -2)
  ans  =
-
   T
 assert_checkequal(e.line_mode, "on")
  ans  =
-
   T
 assert_checkequal(e.fill_mode, "off")
  ans  =
-
   T
 assert_checkequal(e.line_style, 1)
  ans  =
-
   T
 assert_checkequal(e.thickness, 1)
  ans  =
-
   T
 assert_checkequal(e.foreground, -1)
  ans  =
-
   T
 assert_checkequal(e.background, -2)
  ans  =
-
   T
 assert_checkequal(e.data, [-1 1 2 2])
  ans  =
-
   T
 assert_checkequal(e.visible, "on")
  ans  =
-
   T
 assert_checkequal(e.clip_state, "off")
  ans  =
-
   T
 assert_checkequal(e.clip_box, [])
  ans  =
-
   T
 assert_checkequal(e.user_data, [])
  ans  =
-
   T
 assert_checkequal(e.fill_mode, "off")
  ans  =
-
   T
index e662529..9157ed7 100644 (file)
@@ -14,73 +14,55 @@ xarrows(x1,y1);
 e = gce();
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-  T  
+  T
 assert_checkequal(e.children, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.visible, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.data, [x1(:), y1(:)])
  ans  =
-  T  
+  T
 assert_checkequal(e.line_mode, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.line_style, 1)
  ans  =
-  T  
+  T
 assert_checkequal(e.thickness, 1)
  ans  =
-  T  
+  T
 assert_checkequal(e.arrow_size, -1)
  ans  =
-  T  
+  T
 assert_checkequal(e.segs_color, -1 * ones(1, 10))
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_mode, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_style, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_size_unit, "tabulated")
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_size, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_foreground, -1)
  ans  =
-  T  
+  T
 assert_checkequal(e.mark_background, -2)
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_state, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_box, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.user_data, [])
  ans  =
-  T  
+  T
index 1b74f9e..60dc884 100644 (file)
 a = gca();
 assert_checkequal(typeof(a.x_ticks), "ticks")
  ans  =
-  T  
+  T
 assert_checkequal(typeof(a.y_ticks), "ticks")
  ans  =
-  T  
+  T
 assert_checkequal(typeof(a.z_ticks), "ticks")
  ans  =
-  T  
+  T
 assert_checkequal(a.auto_ticks, ["on" "on" "on"])
  ans  =
-  T  
+  T
 assert_checkequal(a.view, "2d")
  ans  =
-  T  
+  T
 assert_checkalmostequal(a.x_ticks.locations, [0:0.1:1]')
  ans  =
-  T  
+  T
 assert_checkequal(a.x_ticks.labels, ["0.0", string(0.1:0.1:0.9), "1.0"]')
  ans  =
-  T  
+  T
 assert_checkalmostequal(a.y_ticks.locations, [0:0.1:1]')
  ans  =
-  T  
+  T
 assert_checkequal(a.y_ticks.labels, ["0.0", string(0.1:0.1:0.9), "1.0"]')
  ans  =
-  T  
+  T
 assert_checkequal(a.z_ticks.locations, [])
  ans  =
-  T  
+  T
 assert_checkequal(a.z_ticks.labels, [])
  ans  =
-  T  
+  T
 newTicks = tlist(["ticks" "locations" "labels"], [0:0.01:1]', string([0:0.01:1])');
 // Change x_ticks
 // auto_ticks wil move to ["off" "on" "on"]
 a.x_ticks = newTicks;
 assert_checkalmostequal(a.x_ticks.locations, [0:0.01:1]')
  ans  =
-  T  
+  T
 assert_checkequal(a.x_ticks.labels, string([0:0.01:1])')
  ans  =
-  T  
+  T
 assert_checkequal(a.auto_ticks, ["off" "on" "on"])
  ans  =
-  T  
+  T
 // Try to change z_ticks
 // View is "2d" => no changes made !!!
 // except auto_ticks wil move to ["off" "on" "off"]
 a.z_ticks = newTicks;
 assert_checkequal(a.z_ticks.locations, [])
  ans  =
-  T  
+  T
 assert_checkequal(a.z_ticks.labels, [])
  ans  =
-  T  
+  T
 assert_checkequal(a.auto_ticks, ["off" "on" "off"])
  ans  =
-  T  
+  T
 // Reset auto_ticks and move to 3d view
 a.auto_ticks = ["on" "on" "on"];
 a.view = "3d";
 assert_checkequal(a.auto_ticks, ["on" "on" "on"])
  ans  =
-  T  
+  T
 assert_checkequal(a.view, "3d")
  ans  =
-  T  
+  T
 // z_ticks now have default values
 assert_checkalmostequal(a.z_ticks.locations, [-1:0.2:1]')
  ans  =
-  T  
+  T
 assert_checkequal(a.z_ticks.labels, ["-1.0", string(-0.8:0.2:-0.2),"0.0", string(0.2:0.2:0.8)  "1.0"]')
  ans  =
-  T  
+  T
 // Try to change z_ticks
 // auto_ticks wil move to ["on" "on" "off"]
 a.z_ticks = newTicks;
 assert_checkequal(a.auto_ticks, ["on" "on" "off"])
  ans  =
-  T  
+  T
 assert_checkalmostequal(a.z_ticks.locations, [0:0.01:1]')
  ans  =
-  T  
+  T
 assert_checkequal(a.z_ticks.labels, [string(0:0.01:1)]')
  ans  =
-  T  
+  T
 clf();
 plot(1d3:2d3, 1d3:2d3);
 a = gca();
index 2494cae..3f3f07a 100644 (file)
@@ -10,89 +10,67 @@ xstring(0.5,0.5,["$\overbrace{Scilab}$" "n''est ";"pas" "$\underbrace{Matlab}$"]
 e = gce();
 assert_checkequal(e.type, "Text")
  ans  =
-  T  
+  T
 assert_checkequal(e.parent.type, "Axes")
  ans  =
-  T  
+  T
 assert_checkequal(e.children, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.text, ["$\overbrace{Scilab}$","n''est";"pas","$\underbrace{Matlab}$"])
  ans  =
-  T  
+  T
 assert_checkequal(e.alignment, "left")
  ans  =
-  T  
+  T
 assert_checkequal(e.data, [0.5 0.5])
  ans  =
-  T  
+  T
 assert_checkequal(e.box, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.line_mode, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.fill_mode, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.text_box, [0 0])
  ans  =
-  T  
+  T
 assert_checkequal(e.text_box_mode, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.font_foreground, -1)
  ans  =
-  T  
+  T
 assert_checkequal(e.foreground, -1)
  ans  =
-  T  
+  T
 assert_checkequal(e.background, -2)
  ans  =
-  T  
+  T
 assert_checkequal(e.font_style, 6)
  ans  =
-  T  
+  T
 assert_checkequal(e.font_size, 1)
  ans  =
-  T  
+  T
 assert_checkequal(e.fractional_font, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.auto_dimensionning, "on")
  ans  =
-  T  
+  T
 assert_checkequal(e.font_angle, 0)
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_state, "off")
  ans  =
-  T  
+  T
 assert_checkequal(e.clip_box, [])
  ans  =
-  T  
+  T
 assert_checkequal(e.user_data, [])
  ans  =
-  T  
+  T
index ddfed1f..3c1b1c0 100644 (file)
@@ -19,5 +19,5 @@ h = uicontrol(f,"style","listbox",..
     "position",[10 10 150 150],..
     "string",["\Q\q"]);
 if get(h,"string") <> "\Q\q" then bugmes();quit;end
-set(h,"string",["\Q","\q"]) 
+set(h,"string",["\Q","\q"])
 if or(get(h,"string") <> ["\Q","\q"]) then bugmes();quit;end
index 669b7de..b40c407 100644 (file)
@@ -4,7 +4,6 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-//
 // <-- Non-regression test for bug 8827 -->
 //
 // <-- TEST WITH GRAPHIC -->
index 24f04c4..a609b1f 100644 (file)
@@ -21,4 +21,4 @@ load(path);
 listvarinfile(path);
 Name                     Type           Size            Bytes
 -------------------------------------------------------------
-c                        cell           1 by 3          68        
+c                        cell           1 by 3          62        
index 8dfc89c..d814d2a 100644 (file)
@@ -39,9 +39,7 @@ mputl(["<?xml version=""1.0"" encoding=""UTF-8""?>"
        "</refentry>"], tmpfile);
 cd(tmpdir);
 jar = xmltojar('.', 'foo', 'en_US');
-
 Building the master document:
        TMPDIR\testxml\en_US
-
 Building the manual file [javaHelp] in TMPDIR\testxml\en_US.
 if ~isfile(jar) then bugmes();quit;end
index 39d8052..cbb2fff 100644 (file)
@@ -26,12 +26,9 @@ mkdir(TMPDIR+"/bug_1768/help");
 mkdir(TMPDIR+"/bug_1768/help/en_US");
 mputl(T,TMPDIR+"/bug_1768/help/en_US/foo1.xml");
 index_file = xmltohtml(TMPDIR+"/bug_1768/help/en_US","Bug 1768 Manual");
-
 Building the master document:
        TMPDIR\bug_1768\help\en_US
-
 Building the manual file [html] in TMPDIR\bug_1768\help\en_US.
- Generate image ./foo1_1.png from Scilab code from file foo1.xml   
+Generate image ./foo1_1.png from Scilab code from file foo1.xml
 if ~isdir(TMPDIR+"/bug_1768/help/en_US/scilab_en_US_help") then bugmes();quit;end
 if fileinfo(index_file) == [] then bugmes();quit;end
index 24d2bae..498ad5f 100644 (file)
@@ -38,9 +38,7 @@ mputl(["<?xml version=""1.0"" encoding=""UTF-8""?>"
        "</refentry>"], tmpfile);
 cd(tmpdir);
 jar = xmltojar('.', 'foo', 'en_US');
-
 Building the master document:
        TMPDIR\testxml\en_US
-
 Building the manual file [javaHelp] in TMPDIR\testxml\en_US.
 if ~isfile(jar) then bugmes();quit;end
index 4455028..0dbcc50 100644 (file)
@@ -17,10 +17,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 1 [fr_FR]";
 xmltohtml(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_1\help\fr_FR
-
 Génération du fichier d'aide [html] in TMPDIR\examples\example_1\help\fr_FR.
 html_info =  fileinfo(my_module_path+"/html/fr_FR/index.html");
 if html_info == [] then bugmes();quit;end       // file existence
@@ -32,10 +30,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 1 [en_US]";
 xmltohtml(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_1\help\en_US
-
 Building the manual file [html] in TMPDIR\examples\example_1\help\en_US.
 html_info =  fileinfo(my_module_path+"/html/en_US/index.html");
 if html_info == [] then bugmes();quit;end       // file existence
@@ -51,10 +47,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 2 [fr_FR]";
 xmltohtml(my_french_help_dir,my_french_help_title,'fr_FR');
-
 Génération du document maître :
        TMPDIR\examples\example_2\help\fr_FR
-
 Génération du fichier d'aide [html] in TMPDIR\examples\example_2\help\fr_FR.
 html_info =  fileinfo(my_module_path+"/html/fr_FR/index.html");
 if html_info == [] then bugmes();quit;end       // file existence
@@ -66,10 +60,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 2 [en_US]";
 xmltohtml(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_2\help\en_US
-
 Building the manual file [html] in TMPDIR\examples\example_2\help\en_US.
 html_info =  fileinfo(my_module_path+"/html/en_US/index.html");
 if html_info == [] then bugmes();quit;end       // file existence
@@ -85,10 +77,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 3 [fr_FR]";
 xmltohtml(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_3\help\fr_FR
-
 Génération du fichier d'aide [html] in TMPDIR\examples\example_3\help\fr_FR.
 html_info =  fileinfo(my_module_path+"/html/fr_FR/index.html");
 if html_info == [] then bugmes();quit;end       // file existence
@@ -100,10 +90,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 3 [en_US]";
 xmltohtml(my_english_help_dir,my_english_help_title,"en_US","fr_FR");
-
 Building the master document:
        TMPDIR\examples\example_3\help\en_US
-
 Building the manual file [html] in TMPDIR\examples\example_3\help\en_US.
 html_info =  fileinfo(my_module_path+"/html/en_US/index.html");
 if html_info == [] then bugmes();quit;end       // file existence
index 93ee67e..0139740 100644 (file)
@@ -17,10 +17,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 1 [fr_FR]";
 xmltojar(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_1\help\fr_FR
-
 Génération du fichier d'aide [javaHelp] in TMPDIR\examples\example_1\help\fr_FR.
 jar_info =  fileinfo(my_module_path+"/jar/scilab_fr_FR_help.jar");
 if jar_info == [] then bugmes();quit;end       // file existence
@@ -33,10 +31,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 1 [en_US]";
 xmltojar(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_1\help\en_US
-
 Building the manual file [javaHelp] in TMPDIR\examples\example_1\help\en_US.
 jar_info =  fileinfo(my_module_path+"/jar/scilab_en_US_help.jar");
 if jar_info == [] then bugmes();quit;end       // file existence
@@ -53,10 +49,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 2 [fr_FR]";
 xmltojar(my_french_help_dir,my_french_help_title,'fr_FR');
-
 Génération du document maître :
        TMPDIR\examples\example_2\help\fr_FR
-
 Génération du fichier d'aide [javaHelp] in TMPDIR\examples\example_2\help\fr_FR.
 jar_info =  fileinfo(my_module_path+"/jar/scilab_fr_FR_help.jar");
 if jar_info == [] then bugmes();quit;end       // file existence
@@ -69,10 +63,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 2 [en_US]";
 xmltojar(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_2\help\en_US
-
 Building the manual file [javaHelp] in TMPDIR\examples\example_2\help\en_US.
 jar_info =  fileinfo(my_module_path+"/jar/scilab_en_US_help.jar");
 if jar_info == [] then bugmes();quit;end       // file existence
@@ -89,10 +81,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 3 [fr_FR]";
 xmltojar(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_3\help\fr_FR
-
 Génération du fichier d'aide [javaHelp] in TMPDIR\examples\example_3\help\fr_FR.
 jar_info =  fileinfo(my_module_path+"/jar/scilab_fr_FR_help.jar");
 if jar_info == [] then bugmes();quit;end       // file existence
@@ -105,10 +95,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 3 [en_US]";
 xmltojar(my_english_help_dir,my_english_help_title,"en_US","fr_FR");
-
 Building the master document:
        TMPDIR\examples\example_3\help\en_US
-
 Building the manual file [javaHelp] in TMPDIR\examples\example_3\help\en_US.
 jar_info =  fileinfo(my_module_path+"/jar/scilab_en_US_help.jar");
 if jar_info == [] then bugmes();quit;end       // file existence
index 073a4f7..11d9249 100644 (file)
@@ -18,10 +18,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 1 [fr_FR]";
 xmltopdf(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_1\help\fr_FR
-
 Génération du fichier d'aide [pdf] in TMPDIR\examples\example_1\help\fr_FR.
 pdf_info =  fileinfo(my_module_path+"/pdf/scilab_fr_FR_help.pdf");
 if pdf_info == [] then bugmes();quit;end       // file existence
@@ -34,10 +32,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 1 [en_US]";
 xmltopdf(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_1\help\en_US
-
 Building the manual file [pdf] in TMPDIR\examples\example_1\help\en_US.
 pdf_info =  fileinfo(my_module_path+"/pdf/scilab_en_US_help.pdf");
 if pdf_info == [] then bugmes();quit;end       // file existence
@@ -54,10 +50,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 2 [fr_FR]";
 xmltopdf(my_french_help_dir,my_french_help_title,'fr_FR');
-
 Génération du document maître :
        TMPDIR\examples\example_2\help\fr_FR
-
 Génération du fichier d'aide [pdf] in TMPDIR\examples\example_2\help\fr_FR.
 pdf_info =  fileinfo(my_module_path+"/pdf/scilab_fr_FR_help.pdf");
 if pdf_info == [] then bugmes();quit;end       // file existence
@@ -70,10 +64,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 2 [en_US]";
 xmltopdf(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_2\help\en_US
-
 Building the manual file [pdf] in TMPDIR\examples\example_2\help\en_US.
 pdf_info =  fileinfo(my_module_path+"/pdf/scilab_en_US_help.pdf");
 if pdf_info == [] then bugmes();quit;end       // file existence
@@ -90,10 +82,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 3 [fr_FR]";
 xmltopdf(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_3\help\fr_FR
-
 Génération du fichier d'aide [pdf] in TMPDIR\examples\example_3\help\fr_FR.
 pdf_info =  fileinfo(my_module_path+"/pdf/scilab_fr_FR_help.pdf");
 if pdf_info == [] then bugmes();quit;end       // file existence
@@ -106,10 +96,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 3 [en_US]";
 xmltopdf(my_english_help_dir,my_english_help_title,"en_US","fr_FR");
-
 Building the master document:
        TMPDIR\examples\example_3\help\en_US
-
 Building the manual file [pdf] in TMPDIR\examples\example_3\help\en_US.
 pdf_info =  fileinfo(my_module_path+"/pdf/scilab_en_US_help.pdf");
 if pdf_info == [] then bugmes();quit;end       // file existence
index 967b6fc..be92dfa 100644 (file)
@@ -17,10 +17,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 1 [fr_FR]";
 xmltops(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_1\help\fr_FR
-
 Génération du fichier d'aide [ps] in TMPDIR\examples\example_1\help\fr_FR.
 ps_info =  fileinfo(my_module_path+"/ps/scilab_fr_FR_help.ps");
 if ps_info == [] then bugmes();quit;end       // file existence
@@ -33,10 +31,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 1 [en_US]";
 xmltops(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_1\help\en_US
-
 Building the manual file [ps] in TMPDIR\examples\example_1\help\en_US.
 ps_info =  fileinfo(my_module_path+"/ps/scilab_en_US_help.ps");
 if ps_info == [] then bugmes();quit;end       // file existence
@@ -53,10 +49,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 2 [fr_FR]";
 xmltops(my_french_help_dir,my_french_help_title,'fr_FR');
-
 Génération du document maître :
        TMPDIR\examples\example_2\help\fr_FR
-
 Génération du fichier d'aide [ps] in TMPDIR\examples\example_2\help\fr_FR.
 ps_info =  fileinfo(my_module_path+"/ps/scilab_fr_FR_help.ps");
 if ps_info == [] then bugmes();quit;end       // file existence
@@ -69,10 +63,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 2 [en_US]";
 xmltops(my_english_help_dir,my_english_help_title,'en_US');
-
 Building the master document:
        TMPDIR\examples\example_2\help\en_US
-
 Building the manual file [ps] in TMPDIR\examples\example_2\help\en_US.
 ps_info =  fileinfo(my_module_path+"/ps/scilab_en_US_help.ps");
 if ps_info == [] then bugmes();quit;end       // file existence
@@ -89,10 +81,8 @@ setlanguage("fr_FR");
 my_french_help_dir    =  my_module_path+"/help/fr_FR";
 my_french_help_title  =  "TEST 3 [fr_FR]";
 xmltops(my_french_help_dir,my_french_help_title,"fr_FR");
-
 Génération du document maître :
        TMPDIR\examples\example_3\help\fr_FR
-
 Génération du fichier d'aide [ps] in TMPDIR\examples\example_3\help\fr_FR.
 ps_info =  fileinfo(my_module_path+"/ps/scilab_fr_FR_help.ps");
 if ps_info == [] then bugmes();quit;end       // file existence
@@ -105,10 +95,8 @@ setlanguage("en_US");
 my_english_help_dir    =  my_module_path+"/help/en_US";
 my_english_help_title  =  "TEST 3 [en_US]";
 xmltops(my_english_help_dir,my_english_help_title,"en_US","fr_FR");
-
 Building the master document:
        TMPDIR\examples\example_3\help\en_US
-
 Building the manual file [ps] in TMPDIR\examples\example_3\help\en_US.
 ps_info =  fileinfo(my_module_path+"/ps/scilab_en_US_help.ps");
 if ps_info == [] then bugmes();quit;end       // file existence
index 15ec7cc..c138074 100644 (file)
@@ -15,7 +15,7 @@
 // call to getenv with an big environment variable leads to memory corruption
 a = "azerty"
  a  = 
- azerty
+  "azerty"
 b = "";
 for i = 1:4000
     b = b + a;
index ee22b6c..b60bb01 100644 (file)
@@ -17,7 +17,7 @@ write(%io(2),'toto');
 toto
 A = 1;
 write(%io(2),A);
-   1.0000000000D+00                                                     
+   1.0000000000E+00                                                     
 B = [1 2];
 write(%io(2),B);
-   1.0000000000D+00  2.0000000000D+00                                   
+   1.0000000000E+00  2.0000000000E+00                                   
index 57a0a44..718ecbe 100644 (file)
 // setdefaultlanguage does not set correctly in Windows registry
 old = getlanguage();
 lang = [ ...
-    "zh_TW" ...
-    "zh_CN" ...
-    "uk_UA" ...
-    "ru_RU" ...
-    "pt_BR" ...
-    "pl_PL" ...
-    "ja_JP" ...
-    "it_IT" ...
-    "fr_FR" ...
-    "es_ES" ...
-    "en_US" ...
-    "de_DE" ...
-    "cs_CZ" ...
-    "ca_ES"];
+"zh_TW" ...
+"zh_CN" ...
+"uk_UA" ...
+"ru_RU" ...
+"pt_BR" ...
+"pl_PL" ...
+"ja_JP" ...
+"it_IT" ...
+"fr_FR" ...
+"es_ES" ...
+"en_US" ...
+"de_DE" ...
+"cs_CZ" ...
+"ca_ES"];
 for l = lang
     setdefaultlanguage(l);
     val = winqueryreg("HKEY_CURRENT_USER", "SOFTWARE\Scilab\" + getversion() + "\Settings", "LANGUAGE");
@@ -65,5 +65,5 @@ Restartujte Scilab pro použití do nabídek.
 No es pot canviar l'idioma dels menús en una consola en execució.
 Reinicieu el Scilab per aplicar-ho als menús.
 setdefaultlanguage(old);
-Le langage des menus ne peut pas être changé dans une console en cours de fonctionnement.
-Redémarrer Scilab pour appliquer les changements aux menus.
+The language for menus cannot be changed on a running console.
+Restart Scilab to apply to menus.
index 72f7948..a24f00a 100644 (file)
@@ -23,16 +23,16 @@ dé = 1
    1.
 txt = "é"
  txt  = 
- é
+  "é"
 txt = "définie"
  txt  = 
- définie
+  "définie"
 txt = "dé"
  txt  = 
- dé
+  "dé"
 txt = "éd"
  txt  = 
- éd
+  "éd"
 // UTF-8 3 bytes
 € = 1
  €  = 
@@ -48,16 +48,16 @@ d€ = 1
    1.
 txt = "€"
  txt  = 
- €
+  "€"
 txt = "d€finie"
  txt  = 
- d€finie
+  "d€finie"
 txt = "d€"
  txt  = 
- d€
+  "d€"
 txt = "€d"
  txt  = 
- €d
+  "€d"
 豈 = 42
  豈  = 
    42.
@@ -72,16 +72,16 @@ bla豈 = 42
    42.
 txt = "豈"
  txt  = 
- 豈
+  "豈"
 txt = "豈bla"
  txt  = 
- 豈bla
+  "豈bla"
 txt = "bla豈"
  txt  = 
- bla豈
+  "bla豈"
 txt = "豈bla"
  txt  = 
- 豈bla
+  "豈bla"
 // UTF-8 4 bytes
 𯿽 = 51
  𯿽  = 
@@ -97,13 +97,13 @@ bla𯿽 = 51
    51.
 txt = "𯿽"
  txt  = 
- 𯿽
+  "𯿽"
 txt = "bla𯿽bla"
  txt  = 
- bla𯿽bla
+  "bla𯿽bla"
 txt = "bla𯿽"
  txt  = 
- bla𯿽
+  "bla𯿽"
 txt = "𯿽bla"
  txt  = 
- 𯿽bla
+  "𯿽bla"
index c957d64..aa644fd 100644 (file)
@@ -17,28 +17,28 @@ lang=getdefaultlanguage(); if setlanguage(lang) <> %T then bugmes();quit;end
 lang="en_US"; if setlanguage(lang) <> %T then bugmes();quit;end
 getlanguage()
  ans  =
- en_US
+  "en_US"
 // Switch to english with small code
 lang="en"; if setlanguage(lang) <> %T then bugmes();quit;end
 getlanguage()
  ans  =
- en_US
+  "en_US"
 // Switch to french with small code
 lang="fr"; if setlanguage(lang) <> %T then bugmes();quit;end
 getlanguage()
  ans  =
- fr_FR
+  "fr_FR"
 // Switch to russian with full code
 lang="ru_RU"; if setlanguage(lang) <> %T then bugmes();quit;end
 getlanguage()
  ans  =
- ru_RU
+  "ru_RU"
 // Switch to a wrong code
 lang="f"; if setlanguage(lang) <> %F then bugmes();quit;end
 setlanguage: Язык 'f' не поддерживается.
 getlanguage()
  ans  =
- ru_RU
+  "ru_RU"
 // Switch to a wrong code
 lang="ff"; if setlanguage(lang) <> %F then bugmes();quit;end
 setlanguage: Язык 'ff' не поддерживается.
index 0bbd6c3..dcb9566 100644 (file)
@@ -34,21 +34,15 @@ if msprintf(text(i)+myStr,text(i)) <> text(i)+myStr2+text(i) then bugmes();quit;
 // Classic display
 disp(text(i));
 end
- 中文測試
- азеазеясдвклгхклмвцмзер
- ድቅስድቅስግጅክልውሽችክልዝ
- すべての人間は、生まれながらにして自由であり、かつ、尊厳と権利と について平等である。人間は、理性と良心とを授けられており、互いに同 胞の精 
- 神をもって行動しなければならない。                                                     
- 人 人 生 而 自 由, 在 尊 严 和 权 利 上 一 律 平 等。 他 们 赋 有 理 性 和 良 心, 并 应 以 兄 弟 关 系 的 
-  精 神 相 对 待。                                                           
- ราทุกคนเกิดมาอย่างอิสระ เราทุกคนมีความคิดและความเข้าใจเป็นของเราเอง เร 
- าทุกคนควรได้รับการปฏิบัติในทางเดียวกัน.                               
- 모든 인간은 태어날 때부터 자유로우며 그 존엄과 권리에 있어 동등하다. 인간은 천부적으로 이성과 양심을 부여받았으며 서로 형제 
- 애의 정신으로 행동하여야 한다.                                                     
- لد جميع الناس أحرارًا متساوين في الكرامة والحقوق. وقد وهبوا عقلاً وضمي 
- رًا وعليهم أن يعامل بعضهم بعضًا بروح الإخاء                           
- כל בני האדם נולדו בני חורין ושווים בערכם ובזכיותיהם. כולם חוננו בתבונה 
-  ובמצפון, לפיכך חובה עליהם לנהג איש ברעהו ברוח של אחוה                
+  "中文測試"
+  "азеазеясдвклгхклмвцмзер"
+  "ድቅስድቅስግጅክልውሽችክልዝ"
+  "すべての人間は、生まれながらにして自由であり、かつ、尊厳と権利と について平等である。人間は、理性と良心とを授けられており、互いに同 胞の精神をもって行動しなければならない。"
+  "人 人 生 而 自 由, 在 尊 严 和 权 利 上 一 律 平 等。 他 们 赋 有 理 性 和 良 心, 并 应 以 兄 弟 关 系 的 精 神 相 对 待。"
+  "ราทุกคนเกิดมาอย่างอิสระ เราทุกคนมีความคิดและความเข้าใจเป็นของเราเอง เราทุกคนควรได้รับการปฏิบัติในทางเดียวกัน."
+  "모든 인간은 태어날 때부터 자유로우며 그 존엄과 권리에 있어 동등하다. 인간은 천부적으로 이성과 양심을 부여받았으며 서로 형제애의 정신으로 행동하여야 한다."
+  "لد جميع الناس أحرارًا متساوين في الكرامة والحقوق. وقد وهبوا عقلاً وضميرًا وعليهم أن يعامل بعضهم بعضًا بروح الإخاء"
+  "כל בני האדם נולדו בני חורין ושווים בערכם ובזכיותיהם. כולם חוננו בתבונה ובמצפון, לפיכך חובה עליהם לנהג איש ברעהו ברוח של אחוה"
 //title('title test'+text); t=0:0.1:2*%pi; //<------Test 7  text drawing test
 //plot2d(t,[sin(t'),cos(t')],[-1,2]); 
 //legends(['legends test'+text ;'text B '+text],[-1,2], opt=3 );
index 35e9320..93a4195 100644 (file)
@@ -9,7 +9,7 @@
 // <-- Non-regression test for bug 1636 -->
 //
 // <-- Bugzilla URL -->
-// http://bugzilla.scilab.org/show_bug.cgi?id=1636
+// http://bugzilla.scilab.org/1636
 //
 // <-- Short Description -->
 //    When processing an m-file with multiple continuation lines in the
index 72bb4f8..acc881a 100644 (file)
@@ -40,10 +40,10 @@ mfile2sci(MFILE,TMPDIR);
   ****** End of mfile2sci() session ******
 SCIFILECONTENTS=mgetl(SCIFILE);
 SCIFILECONTENTSREF=[
-    ""
-    "a = 1;"
-    "while a==1"
-    "  a = 2;"
-    "end;"
-    "a = 3"];
+        ""
+        "a = 1;"
+        "while a==1"
+        "  a = 2;"
+        "end;"
+        "a = 3"];
 if or(SCIFILECONTENTSREF<>SCIFILECONTENTS) then bugmes();quit;end
index a097d17..8ede0e3 100644 (file)
@@ -1,13 +1,19 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2005-2006 - INRIA - Farid Belahcene
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
 // <-- Non-regression test for bug 1725 -->
 //
 // <-- Bugzilla URL -->
 // http://bugzilla.scilab.org/show_bug.cgi?id=1725
 //
 // <-- Short Description -->
-//    the function mtlb_axis returns an index error when called with an
+//    the function mtlb_axis returns an index error when called with an 
 //    argument of [ 1 500 -22.3 1.4] or any other argument.
 //
-//    This was traced to varargout(1) not being set to a.data_bounds within
+//    This was traced to varargout(1) not being set to a.data_bounds within 
 //    the code segment
 //    if rhs>0 then
 //
 //    end
 //    endfunction
 //
-//    Changing this to
+//    Changing this to 
 //    if rhs>0 then
 //
 //        statements
 //      varargout(1)=a.data_bounds;
 // ...
-// Copyright INRIA
-// Scilab Project - Farid Belahcene
-// Copyright INRIA 2005
-// Date : 09 janvier 2006
 a = mtlb_axis([ 1 500 -22.3 1.4]);
 if or(a <> [1 500 -22.3 1.4]) then bugmes();quit;end
index 3dcbb6d..44c2926 100644 (file)
@@ -15,6 +15,8 @@
 // <-- Short Description -->
 // loadmatfile could not load hypermatrices of integer types.
 loadmatfile(SCI + "/modules/matio/tests/nonreg_tests/bug_8783.mat")
+ ans  =
+    []
 int8hmref(:,:,1) = [
     127  127  127  127;
     127  127  127  127;
index 9d1ff04..205647b 100644 (file)
@@ -192,168 +192,168 @@ for formatIndex = 1:size(binFormats, "*")
     //
     assert_checkequal(eye100x100 , eye(100,100));
 end
- cplxdoublecolvector-v4.mat
- cplxdoublematrix-v4.mat
- cplxdoublerowvector-v4.mat
- cplxdoublescalar-v4.mat
- emptydoublematrix-v4.mat
- emptystringmatrix-v4.mat
- eye100x100-v4.mat
- realdoublecolvector-v4.mat
- realdoublematrix-v4.mat
- realdoublerowvector-v4.mat
- realdoublescalar-v4.mat
- stringcolvector-v4.mat
- stringmatrix-v4.mat
- stringrowvector-v4.mat
- stringscalar-v4.mat
- arraycell-v6.mat
- arraystruct-v6.mat
- colcell-v6.mat
- colstruct-v6.mat
- complexdoubleNDarray-v6.mat
- cplxdoublecolvector-v6.mat
- cplxdoublematrix-v6.mat
- cplxdoublerowvector-v6.mat
- cplxdoublescalar-v6.mat
- emptyNDarray-v6.mat
- emptycell-v6.mat
- emptydoublematrix-v6.mat
- emptyint16matrix-v6.mat
- emptyint32matrix-v6.mat
- emptyint64matrix-v6.mat
- emptyint8matrix-v6.mat
- emptysparse-v6.mat
- emptystringmatrix-v6.mat
- emptystruct-v6.mat
- emptyuint16matrix-v6.mat
- emptyuint32matrix-v6.mat
- emptyuint64matrix-v6.mat
- emptyuint8matrix-v6.mat
- eye100x100-v6.mat
- int16colvector-v6.mat
- int16matrix-v6.mat
- int16rowvector-v6.mat
- int16scalar-v6.mat
- int32colvector-v6.mat
- int32matrix-v6.mat
- int32rowvector-v6.mat
- int32scalar-v6.mat
- int64colvector-v6.mat
- int64matrix-v6.mat
- int64rowvector-v6.mat
- int64scalar-v6.mat
- int8colvector-v6.mat
- int8matrix-v6.mat
- int8rowvector-v6.mat
- int8scalar-v6.mat
- realcolvectorsparse-v6.mat
- realdoubleNDarray-v6.mat
- realdoublecolvector-v6.mat
- realdoublematrix-v6.mat
- realdoublerowvector-v6.mat
- realdoublescalar-v6.mat
- realmatrixsparse-v6.mat
- realrowvectorsparse-v6.mat
- realscalarsparse-v6.mat
- rowcell-v6.mat
- rowstruct-v6.mat
- scalarcell-v6.mat
- scalarstruct-v6.mat
- stringcell-v6.mat
- stringcolvector-v6.mat
- stringmatrix-v6.mat
- stringrowvector-v6.mat
- stringscalar-v6.mat
- uint16colvector-v6.mat
- uint16matrix-v6.mat
- uint16rowvector-v6.mat
- uint16scalar-v6.mat
- uint32colvector-v6.mat
- uint32matrix-v6.mat
- uint32rowvector-v6.mat
- uint32scalar-v6.mat
- uint64colvector-v6.mat
- uint64matrix-v6.mat
- uint64rowvector-v6.mat
- uint64scalar-v6.mat
- uint8colvector-v6.mat
- uint8matrix-v6.mat
- uint8rowvector-v6.mat
- uint8scalar-v6.mat
- arraycell-v7.mat
- arraystruct-v7.mat
- colcell-v7.mat
- colstruct-v7.mat
- complexdoubleNDarray-v7.mat
- cplxdoublecolvector-v7.mat
- cplxdoublematrix-v7.mat
- cplxdoublerowvector-v7.mat
- cplxdoublescalar-v7.mat
- emptyNDarray-v7.mat
- emptycell-v7.mat
- emptydoublematrix-v7.mat
- emptyint16matrix-v7.mat
- emptyint32matrix-v7.mat
- emptyint64matrix-v7.mat
- emptyint8matrix-v7.mat
- emptysparse-v7.mat
- emptystringmatrix-v7.mat
- emptystruct-v7.mat
- emptyuint16matrix-v7.mat
- emptyuint32matrix-v7.mat
- emptyuint64matrix-v7.mat
- emptyuint8matrix-v7.mat
- eye100x100-v7.mat
- int16colvector-v7.mat
- int16matrix-v7.mat
- int16rowvector-v7.mat
- int16scalar-v7.mat
- int32colvector-v7.mat
- int32matrix-v7.mat
- int32rowvector-v7.mat
- int32scalar-v7.mat
- int64colvector-v7.mat
- int64matrix-v7.mat
- int64rowvector-v7.mat
- int64scalar-v7.mat
- int8colvector-v7.mat
- int8matrix-v7.mat
- int8rowvector-v7.mat
- int8scalar-v7.mat
- realcolvectorsparse-v7.mat
- realdoubleNDarray-v7.mat
- realdoublecolvector-v7.mat
- realdoublematrix-v7.mat
- realdoublerowvector-v7.mat
- realdoublescalar-v7.mat
- realmatrixsparse-v7.mat
- realrowvectorsparse-v7.mat
- realscalarsparse-v7.mat
- rowcell-v7.mat
- rowstruct-v7.mat
- scalarcell-v7.mat
- scalarstruct-v7.mat
- stringcell-v7.mat
- stringcolvector-v7.mat
- stringmatrix-v7.mat
- stringrowvector-v7.mat
- stringscalar-v7.mat
- structsparse-v7.mat
- uint16colvector-v7.mat
- uint16matrix-v7.mat
- uint16rowvector-v7.mat
- uint16scalar-v7.mat
- uint32colvector-v7.mat
- uint32matrix-v7.mat
- uint32rowvector-v7.mat
- uint32scalar-v7.mat
- uint64colvector-v7.mat
- uint64matrix-v7.mat
- uint64rowvector-v7.mat
- uint64scalar-v7.mat
- uint8colvector-v7.mat
- uint8matrix-v7.mat
- uint8rowvector-v7.mat
- uint8scalar-v7.mat
+  "cplxdoublecolvector-v4.mat"
+  "cplxdoublematrix-v4.mat"
+  "cplxdoublerowvector-v4.mat"
+  "cplxdoublescalar-v4.mat"
+  "emptydoublematrix-v4.mat"
+  "emptystringmatrix-v4.mat"
+  "eye100x100-v4.mat"
+  "realdoublecolvector-v4.mat"
+  "realdoublematrix-v4.mat"
+  "realdoublerowvector-v4.mat"
+  "realdoublescalar-v4.mat"
+  "stringcolvector-v4.mat"
+  "stringmatrix-v4.mat"
+  "stringrowvector-v4.mat"
+  "stringscalar-v4.mat"
+  "arraycell-v6.mat"
+  "arraystruct-v6.mat"
+  "colcell-v6.mat"
+  "colstruct-v6.mat"
+  "complexdoubleNDarray-v6.mat"
+  "cplxdoublecolvector-v6.mat"
+  "cplxdoublematrix-v6.mat"
+  "cplxdoublerowvector-v6.mat"
+  "cplxdoublescalar-v6.mat"
+  "emptyNDarray-v6.mat"
+  "emptycell-v6.mat"
+  "emptydoublematrix-v6.mat"
+  "emptyint16matrix-v6.mat"
+  "emptyint32matrix-v6.mat"
+  "emptyint64matrix-v6.mat"
+  "emptyint8matrix-v6.mat"
+  "emptysparse-v6.mat"
+  "emptystringmatrix-v6.mat"
+  "emptystruct-v6.mat"
+  "emptyuint16matrix-v6.mat"
+  "emptyuint32matrix-v6.mat"
+  "emptyuint64matrix-v6.mat"
+  "emptyuint8matrix-v6.mat"
+  "eye100x100-v6.mat"
+  "int16colvector-v6.mat"
+  "int16matrix-v6.mat"
+  "int16rowvector-v6.mat"
+  "int16scalar-v6.mat"
+  "int32colvector-v6.mat"
+  "int32matrix-v6.mat"
+  "int32rowvector-v6.mat"
+  "int32scalar-v6.mat"
+  "int64colvector-v6.mat"
+  "int64matrix-v6.mat"
+  "int64rowvector-v6.mat"
+  "int64scalar-v6.mat"
+  "int8colvector-v6.mat"
+  "int8matrix-v6.mat"
+  "int8rowvector-v6.mat"
+  "int8scalar-v6.mat"
+  "realcolvectorsparse-v6.mat"
+  "realdoubleNDarray-v6.mat"
+  "realdoublecolvector-v6.mat"
+  "realdoublematrix-v6.mat"
+  "realdoublerowvector-v6.mat"
+  "realdoublescalar-v6.mat"
+  "realmatrixsparse-v6.mat"
+  "realrowvectorsparse-v6.mat"
+  "realscalarsparse-v6.mat"
+  "rowcell-v6.mat"
+  "rowstruct-v6.mat"
+  "scalarcell-v6.mat"
+  "scalarstruct-v6.mat"
+  "stringcell-v6.mat"
+  "stringcolvector-v6.mat"
+  "stringmatrix-v6.mat"
+  "stringrowvector-v6.mat"
+  "stringscalar-v6.mat"
+  "uint16colvector-v6.mat"
+  "uint16matrix-v6.mat"
+  "uint16rowvector-v6.mat"
+  "uint16scalar-v6.mat"
+  "uint32colvector-v6.mat"
+  "uint32matrix-v6.mat"
+  "uint32rowvector-v6.mat"
+  "uint32scalar-v6.mat"
+  "uint64colvector-v6.mat"
+  "uint64matrix-v6.mat"
+  "uint64rowvector-v6.mat"
+  "uint64scalar-v6.mat"
+  "uint8colvector-v6.mat"
+  "uint8matrix-v6.mat"
+  "uint8rowvector-v6.mat"
+  "uint8scalar-v6.mat"
+  "arraycell-v7.mat"
+  "arraystruct-v7.mat"
+  "colcell-v7.mat"
+  "colstruct-v7.mat"
+  "complexdoubleNDarray-v7.mat"
+  "cplxdoublecolvector-v7.mat"
+  "cplxdoublematrix-v7.mat"
+  "cplxdoublerowvector-v7.mat"
+  "cplxdoublescalar-v7.mat"
+  "emptyNDarray-v7.mat"
+  "emptycell-v7.mat"
+  "emptydoublematrix-v7.mat"
+  "emptyint16matrix-v7.mat"
+  "emptyint32matrix-v7.mat"
+  "emptyint64matrix-v7.mat"
+  "emptyint8matrix-v7.mat"
+  "emptysparse-v7.mat"
+  "emptystringmatrix-v7.mat"
+  "emptystruct-v7.mat"
+  "emptyuint16matrix-v7.mat"
+  "emptyuint32matrix-v7.mat"
+  "emptyuint64matrix-v7.mat"
+  "emptyuint8matrix-v7.mat"
+  "eye100x100-v7.mat"
+  "int16colvector-v7.mat"
+  "int16matrix-v7.mat"
+  "int16rowvector-v7.mat"
+  "int16scalar-v7.mat"
+  "int32colvector-v7.mat"
+  "int32matrix-v7.mat"
+  "int32rowvector-v7.mat"
+  "int32scalar-v7.mat"
+  "int64colvector-v7.mat"
+  "int64matrix-v7.mat"
+  "int64rowvector-v7.mat"
+  "int64scalar-v7.mat"
+  "int8colvector-v7.mat"
+  "int8matrix-v7.mat"
+  "int8rowvector-v7.mat"
+  "int8scalar-v7.mat"
+  "realcolvectorsparse-v7.mat"
+  "realdoubleNDarray-v7.mat"
+  "realdoublecolvector-v7.mat"
+  "realdoublematrix-v7.mat"
+  "realdoublerowvector-v7.mat"
+  "realdoublescalar-v7.mat"
+  "realmatrixsparse-v7.mat"
+  "realrowvectorsparse-v7.mat"
+  "realscalarsparse-v7.mat"
+  "rowcell-v7.mat"
+  "rowstruct-v7.mat"
+  "scalarcell-v7.mat"
+  "scalarstruct-v7.mat"
+  "stringcell-v7.mat"
+  "stringcolvector-v7.mat"
+  "stringmatrix-v7.mat"
+  "stringrowvector-v7.mat"
+  "stringscalar-v7.mat"
+  "structsparse-v7.mat"
+  "uint16colvector-v7.mat"
+  "uint16matrix-v7.mat"
+  "uint16rowvector-v7.mat"
+  "uint16scalar-v7.mat"
+  "uint32colvector-v7.mat"
+  "uint32matrix-v7.mat"
+  "uint32rowvector-v7.mat"
+  "uint32scalar-v7.mat"
+  "uint64colvector-v7.mat"
+  "uint64matrix-v7.mat"
+  "uint64rowvector-v7.mat"
+  "uint64scalar-v7.mat"
+  "uint8colvector-v7.mat"
+  "uint8matrix-v7.mat"
+  "uint8rowvector-v7.mat"
+  "uint8scalar-v7.mat"
 // TODO: read all variables from a single file ?
index e3edbb5..c119d65 100644 (file)
@@ -19,6 +19,7 @@ Building macros...
 -- Creation of [fooboxlib] (Macros) --
 genlib: Processing file: baz.sci
 genlib: Processing file: foo.sci
+tbx_build_localization: The module 'foobox' has no entry to be localized.
 Building help...
 Building the master document:
        TMPDIR\foobox\help\en_US
@@ -30,11 +31,12 @@ exec(mytb_dir + "/loader.sce");
 Start foobox
        Load macros
        Load help
+clear oldlines oldmode;
 b = foo("testing it works", 42);
- testing it works
+  "testing it works"
    42.
 baz("World");
- Hello World!
+  "Hello World!"
 assert_checktrue(b);
 // testing default compilation
 mytb_dir = TMPDIR + "/testbox";
@@ -86,6 +88,9 @@ Building gateway...
    Generate a cleaner file
 Generating loader_gateway.sce...
 Generating cleaner_gateway.sce...
+Generating localization
+-- Building for "en_US" --
+-- Building for "fr_FR" --
 Building help...
 Building the master document:
        TMPDIR\testbox\help\en_US
@@ -101,5 +106,6 @@ Start testbox
        Load gateways
        Load Java libraries
        Load help
+clear oldlines oldmode;
 b = csum6(2, 40);
 assert_checkequal(b, 42);
index 437af63..6062cd3 100644 (file)
@@ -52,9 +52,7 @@ gn_1 = list();
 fn_1($+1) = f_tmp;
 gn_1($+1) = df_tmp
  gn_1  = 
-       gn_1(1)
-  -1.1934401
-   17.095542
+  (1) : [2x1 constant]
 to_record = %f;
 [fopt,xopt,gopt]=optim(myf,x0,algo="nd","ar",nap=20,iter=10,epsg=1e-1,epsf=1e-1,epsx=[1e-2;1e-2],iprint=0);
 list_to_plot = xn_1;
index 4e84e1e..ed4491f 100644 (file)
@@ -46,7 +46,7 @@ exp(%i*%pi*X/2)
   -1.837D-16 - i     1. - 2.449D-16i
 exp(%i*%pi*X/4)
  ans  =
-   0.7071068 + 0.7071068i   6.123D-17 + i  
+   0.7071068 + 0.7071068i   6.123D-17 + i         
   -0.7071068 + 0.7071068i  -1.        + 1.225D-16i
 X=[1 20;300 4000]
  X  = 
diff --git a/scilab/modules/overloading/macros/%l_p.sci b/scilab/modules/overloading/macros/%l_p.sci
new file mode 100644 (file)
index 0000000..7d3c49d
--- /dev/null
@@ -0,0 +1,28 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2019 - 2020 - Samuel GOUGEON
+//
+// This file is hereby licensed under the terms of the GNU GPL v2.0,
+// pursuant to article 5.3.4 of the CeCILL v.2.1.
+// This file was originally licensed under the terms of the CeCILL v2.1,
+// and continues to be available under such terms.
+// For more information, see the COPYING file which you should have received
+// along with this program.
+
+function %l_p(s, parentType)
+    if ~isdef("parentType","l") then
+        parentType = "list"
+    end
+    recursive = 0
+    tmp = xmlGetValues("//general/body/environment","container_disp_max_depth")
+    maxDisplayDepth = evstr(tmp)
+    consoleWidth = lines()(1)
+    //l_p_compacity = "";   // "" vspacing of blocks
+    l_p_compacity = [];      // for compact display
+    t = %l_p_inc(s, parentType)
+    if t<>[] then
+        mprintf("  %s\n", t)
+    else
+        mprintf("  empty list()\n")
+    end
+    mprintf("\n")
+endfunction
diff --git a/scilab/modules/overloading/macros/%l_p_inc.sci b/scilab/modules/overloading/macros/%l_p_inc.sci
new file mode 100644 (file)
index 0000000..7caf2ba
--- /dev/null
@@ -0,0 +1,241 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2020 - Samuel GOUGEON
+//
+// This file is hereby licensed under the terms of the GNU GPL v2.0,
+// pursuant to article 5.3.4 of the CeCILL v.2.1.
+// This file was originally licensed under the terms of the CeCILL v2.1,
+// and continues to be available under such terms.
+// For more information, see the COPYING file which you should have received
+// along with this program.
+
+function t = %l_p_inc(s, parentType)
+    // Internal function called by %st_p, %l_p, and %l_p_inc itself
+    // Can be called with s = struct | Tlist | list
+
+    ll    = lines()
+    t     = []
+    indentFields = "    "
+    if parentType=="list" then
+        eq = "= "
+    else
+        eq = " = "
+    end
+
+    if  typeof(s)=="st"
+        // No fields
+        if isempty(fieldnames(s)) then
+            t = msprintf(_("%s struct with no field"), ..
+                         strcat(msprintf("%d\n",size(s)'), "x"));
+            return
+        end
+
+        multi = size(s,"*")
+
+        // 0x0 struct with fields
+        if multi == 0 then
+            t = _("0x0 struct with fields:")
+            for field = fieldnames(s)'
+                t = [t ; "   "+field]
+            end
+            return
+        end
+
+        // axb struct where a<>0 & b<>0
+        if multi > 1 | recursive > maxDisplayDepth then
+            if ~recursive
+                t = msprintf(_("%s struct with fields:"), ..
+                     strcat(msprintf("%d\n", size(s)'), "x"));
+            end
+            tmp = sci2exp(fieldnames(s)', consoleWidth-10)
+            tmp = strsubst(strsubst(tmp, """""", """"), ",", ", ")
+            t = [t ; tmp]
+            return
+        end
+    end
+
+    recursive0 = recursive
+    if type(s)==15 then
+        Fields = 1:length(s)
+    else
+        Fields = fieldnames(s)'
+    end
+
+    // MAIN LOOP
+    // ---------
+    for field = Fields
+        sep = ": "      //   field_name<sep> ...
+        if type(s)==15 then
+            fieldn = msprintf("(%d) ", field)
+        else
+            fieldn = field
+        end
+        clear value
+        value = s(field)
+        if isdef("value","l") then
+            tp = typeof(value)
+        else
+            tp = "void"
+        end
+
+        if tp=="void" then
+            str = _("(void)")
+            sep = eq
+
+        elseif tp == "st" then
+            recursive = recursive + 1
+            str = %l_p_inc(value, "st")
+
+        elseif tp == "implicitlist"
+            str = sci2exp(value)
+            sep = eq
+
+        elseif tp == "function"
+            [out,inp,?] = string(value)
+            if inp==[], inp = "", end
+            if out==[], out = "", end
+            p = macr2tree(value)
+            str = p.name+"("+strcat(inp,",")+") => ["+strcat(out,",")+"] ";
+            str = str + msprintf(_("(%d lines)"),p.nblines)
+            txt = fieldn + ": " + str
+
+        elseif tp == "rational"
+            str = strcat(msprintf("%d\n", size(value)'), "x")
+            tmp = _("rational")
+            if ~isreal(value,0)
+                tmp = _("complex rational")
+            end
+            str = msprintf(_("[%s %s] of %s"), str, tmp, varn(value));
+
+        elseif tp == "ce"
+            if length(value)==0 then
+                str = "{}"
+                txt = fieldn + eq + str
+            else
+                str = strcat(msprintf("%d\n", size(value)'), "x")
+                str = msprintf("[%s %s]", str, _("cell"));
+                txt = fieldn + ": " + str
+            end
+
+        elseif type(value)==15
+            if length(value)==0 then
+                str = _("empty list()")
+            else
+                if recursive < maxDisplayDepth
+                    recursive = recursive + 1
+                    tmp = %l_p_inc(value, "list")
+                    str = ["list:" ; tmp]
+                else
+                    str = msprintf("list with %d elements.\n", length(value))
+                end
+            end
+
+        elseif or(type(value)==[16 17])
+            // Tlists or Mlists
+            Tfields = fieldnames(value);
+            sz = []
+            try
+                sz = size(value)
+            end
+            signature = tp
+            if length(sz) > 1
+                signature = strcat(msprintf("%d\n", sz'), "x") + " " + tp
+            end
+            listType = "tlist"
+            if type(value)==17
+                listType = "mlist"
+            end
+            if Tfields==[]
+                str = msprintf(_("[%s] %s without field."), signature, listType);
+            else
+                str = msprintf(_("[%s] %s with fields:"), signature, listType);
+                if recursive < maxDisplayDepth
+                    recursive = recursive + 1
+                    tmp = %l_p_inc(value, "mtlist")
+                    str = [str ; tmp]
+                else
+                    tmp = sci2exp(Tfields', consoleWidth-10)
+                    tmp = strsubst(strsubst(tmp, """", ""), ",", ", ")
+                    str = [str ; tmp]
+                end
+            end
+
+        elseif type(value)==14  // Library
+            tmp = string(value)
+            p = tmp(1)
+            libname = xmlGetValues("/scilablib","name",p + "lib")
+            str = msprintf("%s library with %d functions @ %s", ..
+                           libname, size(tmp,1)-1, p)
+
+        elseif type(value)> 10 then
+            str = tp
+
+        else
+            sz = size(value)
+            // If number of elements in value is greater than ll(1) (current
+            // page width) then we do not call sci2exp because the returned
+            // value will be ignored at line 68: size(str,"*")==1
+            // Note that ll(1)/2 elements could be the max because of colon,
+            //  semi-colon and brackets added between elements by sci2exp
+            if sz(1) <= 1 & type(value) <> 9 & prod(sz) < ll(1) then
+                // This line can avoid some memory issues when
+                //  field contains a big matrix
+                str = sci2exp(value, ll(1))
+                sep = eq
+            else
+                str = "[" + strcat(msprintf("%d\n",sz'), "x") + " " + tp + "]"
+            end
+        end
+        // ---------------------------
+        if size(str,"*") == 1 & ..
+               and(tp <> ["st" "function" "rational" "ce"])
+            txt = fieldn + sep + str
+
+        elseif and(tp <> ["function" "ce"])
+            if recursive
+                txt0 = indentFields    // indentation for fields list
+                //txt0 = field + "."  // to display the chain of parent fields
+            else
+                txt0 = fieldn
+            end
+            if tp == "st"
+                txt = fieldn + ": "
+                if size(value,"*")==0
+                    txt = txt + _("[0x0 struct] with no field")
+                else
+                    sv = size(value)'
+                    if prod(sv)==1 then
+                        txt = txt + "struct with fields:"
+                    else
+                        txt = txt + msprintf(_("[%s struct] with fields:"), ..
+                                  strcat(msprintf("%d\n", sv), "x"));
+                    end
+                    txt = [txt ; txt0 + str]
+                    if stripblanks(t($)) <> ""
+                        txt = [l_p_compacity ; txt]
+                    end
+                end
+
+            elseif or(type(value)==[15 16 17])
+                txt = fieldn + ": " + str(1)
+                if size(str,1)>1
+                    txt = [txt ; indentFields + str(2:$)]
+                end
+                if stripblanks(t($)) <> ""
+                    txt = [l_p_compacity ; txt]
+                end
+
+            else
+                txt = txt0 + ..
+                  ": " + "[" + strcat(msprintf("%d\n",size(value)'), "x") ..
+                       + " " + tp + "]"
+            end
+        end
+        t = [t ; txt]
+        recursive = recursive0
+    end
+    // Display a blank line after each field that is a non-empty
+    // struct or tlist:
+    if recursive & stripblanks(t($)) <> ""
+        t = [t ; l_p_compacity]
+    end
+endfunction
index 060b073..907df10 100644 (file)
@@ -3,7 +3,7 @@
 // Copyright (C) 2010 - DIGITEO - Vincent COUVERT <vincent.couvert@scilab.org>
 // Copyright (C) 2012 - 2016 - Scilab Enterprises
 // Copyright (C) 2018 - Stéphane MOTTELET
-// Copyright (C) 2019-2020 - Samuel GOUGEON
+// Copyright (C) 2019 - 2020 - Samuel GOUGEON
 //
 // This file is hereby licensed under the terms of the GNU GPL v2.0,
 // pursuant to article 5.3.4 of the CeCILL v.2.1.
 // along with this program.
 
 function %st_p(s)
-    recursive = 0
-    tmp = xmlGetValues("//general/body/environment","container_disp_max_depth")
-    maxDisplayDepth = evstr(tmp)
-    consoleWidth = lines()(1)
-    //st_p_compacity = "";         // "" vspacing of blocks
-    st_p_compacity = [];      // for compact display
-    t = %st_p_inc(s, "st")
-    mprintf("  %s\n", t);
-endfunction
-
-// -------------------------------------------------------------------
-
-function t = %st_p_inc(s, parentType)
-    // Can be called with s = struct | Tlist | list
-
-    ll    = lines()
-    t     = []
-    indentFields = "    "
-    if parentType=="list" then
-        eq = "= "
-    else
-        eq = " = "
-    end
-
-    if  typeof(s)=="st"
-        // No fields
-        if isempty(fieldnames(s)) then
-            t = msprintf(_("%s struct with no field"), ..
-                         strcat(msprintf("%d\n",size(s)'), "x"));
-            return
-        end
-
-        multi = size(s,"*")
-
-        // 0x0 struct with fields
-        if multi == 0 then
-            t = _("0x0 struct with fields:")
-            for field = fieldnames(s)'
-                t = [t ; "   "+field]
-            end
-            return
-        end
-
-        // axb struct where a<>0 & b<>0
-        if multi > 1 | recursive > maxDisplayDepth then
-            if ~recursive
-                t = msprintf(_("%s struct with fields:"), ..
-                     strcat(msprintf("%d\n", size(s)'), "x"));
-            end
-            tmp = sci2exp(fieldnames(s)', consoleWidth-10)
-            tmp = strsubst(strsubst(tmp, """""", """"), ",", ", ")
-            t = [t ; tmp]
-            return
-        end
-    end
-
-    recursive0 = recursive
-    if type(s)==15 then
-        Fields = 1:length(s)
-    else
-        Fields = fieldnames(s)'
-    end
-
-    // MAIN LOOP
-    // ---------
-    for field = Fields
-        sep = ": "      //   field_name<sep> ...
-        if type(s)==15 then
-            fieldn = msprintf("(%d) ", field)
-        else
-            fieldn = field
-        end
-        clear value
-        value = s(field)
-        if isdef("value","l") then
-            tp = typeof(value)
-        else
-            tp = "void"
-        end
-
-        if tp=="void" then
-            str = _("(void)")
-            sep = eq
-
-        elseif tp == "st" then
-            recursive = recursive + 1
-            str = %st_p_inc(value, "st")
-
-        elseif tp == "implicitlist"
-            str = sci2exp(value)
-            sep = eq
-
-        elseif tp == "function"
-            [out,inp,?] = string(value)
-            if inp==[], inp = "", end
-            if out==[], out = "", end
-            p = macr2tree(value)
-            str = p.name+"("+strcat(inp,",")+") => ["+strcat(out,",")+"] ";
-            str = str + msprintf(_("(%d lines)"),p.nblines)
-            txt = fieldn + ": " + str
-
-        elseif tp == "rational"
-            str = strcat(msprintf("%d\n", size(value)'), "x")
-            tmp = _("rational")
-            if ~isreal(value,0)
-                tmp = _("complex rational")
-            end
-            str = msprintf(_("[%s %s] of %s"), str, tmp, varn(value));
-
-        elseif tp == "ce"
-            if length(value)==0 then
-                str = "{}"
-                txt = fieldn + eq + str
-            else
-                str = strcat(msprintf("%d\n", size(value)'), "x")
-                str = msprintf("[%s %s]", str, _("cell"));
-                txt = fieldn + ": " + str
-            end
-
-        elseif type(value)==15
-            if length(value)==0 then
-                str = _(" empty list()")
-            else
-                if recursive < maxDisplayDepth
-                    recursive = recursive + 1
-                    tmp = %st_p_inc(value, "list")
-                    str = ["list:" ; tmp]
-                else
-                    str = msprintf("list with %d elements.\n", length(value))
-                end
-            end
-
-        elseif or(type(value)==[16 17])
-            // Tlists or Mlists
-            Tfields = fieldnames(value);
-            sz = []
-            try
-                sz = size(value)
-            end
-            signature = tp
-            if length(sz) > 1
-                signature = strcat(msprintf("%d\n", sz'), "x") + " " + tp
-            end
-            listType = "tlist"
-            if type(value)==17
-                listType = "mlist"
-            end
-            if Tfields==[]
-                str = msprintf(_("[%s] %s without field."), signature, listType);
-            else
-                str = msprintf(_("[%s] %s with fields:"), signature, listType);
-                if recursive < maxDisplayDepth
-                    recursive = recursive + 1
-                    tmp = %st_p_inc(value, "mtlist")
-                    str = [str ; tmp]
-                else
-                    tmp = sci2exp(Tfields', consoleWidth-10)
-                    tmp = strsubst(strsubst(tmp, """", ""), ",", ", ")
-                    str = [str ; tmp]
-                end
-            end
-
-        elseif type(value)==14  // Library
-            tmp = string(value)
-            p = tmp(1)
-            libname = xmlGetValues("/scilablib","name",p + "lib")
-            str = msprintf("%s library with %d functions @ %s", ..
-                           libname, size(tmp,1)-1, p)
-
-        elseif type(value)> 10 then
-            str = tp
-
-        else
-            sz = size(value)
-            // If number of elements in value is greater than ll(1) (current
-            // page width) then we do not call sci2exp because the returned
-            // value will be ignored at line 68: size(str,"*")==1
-            // Note that ll(1)/2 elements could be the max because of colon,
-            //  semi-colon and brackets added between elements by sci2exp
-            if sz(1) <= 1 & type(value) <> 9 & prod(sz) < ll(1) then
-                // This line can avoid some memory issues when
-                //  field contains a big matrix
-                str = sci2exp(value, ll(1))
-                sep = eq
-            else
-                str = "[" + strcat(msprintf("%d\n",sz'), "x") + " " + tp + "]"
-            end
-        end
-        // ---------------------------
-        if size(str,"*") == 1 & ..
-               and(tp <> ["st" "function" "rational" "ce"])
-            txt = fieldn + sep + str
-
-        elseif and(tp <> ["function" "ce"])
-            if recursive
-                txt0 = indentFields    // indentation for fields list
-                //txt0 = field + "."  // to display the chain of parent fields
-            else
-                txt0 = fieldn
-            end
-            if tp == "st"
-                txt = fieldn + ": "
-                if size(value,"*")==0
-                    txt = txt + _("[0x0 struct] with no field")
-                else
-                    sv = size(value)'
-                    if prod(sv)==1 then
-                        txt = txt + "struct with fields:"
-                    else
-                        txt = txt + msprintf(_("[%s struct] with fields:"), ..
-                                  strcat(msprintf("%d\n", sv), "x"));
-                    end
-                    txt = [txt ; txt0 + str]
-                    if stripblanks(t($)) <> ""
-                        txt = [st_p_compacity ; txt]
-                    end
-                end
-
-            elseif or(type(value)==[15 16 17])
-                txt = fieldn + ": " + str(1)
-                if size(str,1)>1
-                    txt = [txt ; indentFields + str(2:$)]
-                end
-                if stripblanks(t($)) <> ""
-                    txt = [st_p_compacity ; txt]
-                end
-
-            else
-                txt = txt0 + ..
-                  ": " + "[" + strcat(msprintf("%d\n",size(value)'), "x") ..
-                       + " " + tp + "]"
-            end
-        end
-        t = [t ; txt]
-        recursive = recursive0
-    end
-    // Display a blank line after each field that is a non-empty
-    // struct or tlist:
-    if recursive & stripblanks(t($)) <> ""
-        t = [t ; st_p_compacity]
-    end
+    %l_p(s, "st")
 endfunction
index c6c4a36..a0e6d67 100644 (file)
@@ -18,7 +18,7 @@ a.titi = zeros(1,100000);
 tic();
 a
  a  = 
-   toto: [1x100000 constant]
-   titi: [1x100000 constant]
+  toto: [1x100000 constant]
+  titi: [1x100000 constant]
 timeSpent=toc();
 assert_checktrue(timeSpent<1);
index cb83602..eec6f89 100644 (file)
@@ -31,19 +31,19 @@ endfunction
 q0 = new([])
  q0  = 
        q0(1)
-!X  x  !
+  "X"  "x"
        q0(2)
     []
 q1 = new([91,93])
  q1  = 
        q1(1)
-!X  x  !
+  "X"  "x"
        q1(2)
    91.   93.
 q2 = new([10,20,30,40])
  q2  = 
        q2(1)
-!X  x  !
+  "X"  "x"
        q2(2)
    10.   20.   30.   40.
 q2([1,3]) = q1;
index b0a1576..ea19b42 100644 (file)
@@ -67,149 +67,149 @@ M = mlist("unknown");
 if typeof(M) <> "unknown" then bugmes();quit;end
 M
  M  = 
- Calling %unknown_p...
+  "Calling %unknown_p..."
 M(1)
- Calling %unknown_e...
+  "Calling %unknown_e..."
  ans  =
     []
 M(1,2)
- Calling %unknown_e...
+  "Calling %unknown_e..."
  ans  =
     []
 N = M
  N  = 
- Calling %unknown_p...
+  "Calling %unknown_p..."
 N(2) = M
- Calling %unknown_i_unknown...
+  "Calling %unknown_i_unknown..."
  N  = 
     []
 M'
- Calling %unknown_t...
+  "Calling %unknown_t..."
  ans  =
     []
 M.'
- Calling %unknown_0...
+  "Calling %unknown_0..."
  ans  =
     []
 M + M
- Calling %unknown_a_unknown...
+  "Calling %unknown_a_unknown..."
  ans  =
     []
 M - M
- Calling %unknown_s_unknown...
+  "Calling %unknown_s_unknown..."
  ans  =
     []
 M * M
- Calling %unknown_m_unknown...
+  "Calling %unknown_m_unknown..."
  ans  =
     []
 M .* M
- Calling %unknown_x_unknown...
+  "Calling %unknown_x_unknown..."
  ans  =
     []
 M *. M
- Calling %unknown_u_unknown...
+  "Calling %unknown_u_unknown..."
  ans  =
     []
 M .*. M
- Calling %unknown_k_unknown...
+  "Calling %unknown_k_unknown..."
  ans  =
     []
 M / M
- Calling %unknown_r_unknown...
+  "Calling %unknown_r_unknown..."
  ans  =
     []
 M ./ M
- Calling %unknown_d_unknown...
+  "Calling %unknown_d_unknown..."
  ans  =
     []
 M /. M
- Calling %unknown_v_unknown...
+  "Calling %unknown_v_unknown..."
  ans  =
     []
 M ./. M
- Calling %unknown_y_unknown...
+  "Calling %unknown_y_unknown..."
  ans  =
     []
 M \ M
- Calling %unknown_l_unknown...
+  "Calling %unknown_l_unknown..."
  ans  =
     []
 M .\ M
- Calling %unknown_q_unknown...
+  "Calling %unknown_q_unknown..."
  ans  =
     []
 M \. M
- Calling %unknown_w_unknown...
+  "Calling %unknown_w_unknown..."
  ans  =
     []
 M .\. M
- Calling %unknown_z_unknown...
+  "Calling %unknown_z_unknown..."
  ans  =
     []
 M ^ M
- Calling %unknown_p_unknown...
+  "Calling %unknown_p_unknown..."
  ans  =
     []
 M ** M
- Calling %unknown_p_unknown...
+  "Calling %unknown_p_unknown..."
  ans  =
     []
 M .^ M
- Calling %unknown_j_unknown...
+  "Calling %unknown_j_unknown..."
  ans  =
     []
 // M .** M <-- This does not exist in Scilab ... Wired ...
 M:M
- Calling %unknown_b_unknown...
+  "Calling %unknown_b_unknown..."
  ans  =
     []
 M == M
- Calling %unknown_o_unknown...
+  "Calling %unknown_o_unknown..."
  ans  =
     []
 M <> M
- Calling %unknown_n_unknown...
+  "Calling %unknown_n_unknown..."
  ans  =
     []
 M ~= M
- Calling %unknown_n_unknown...
+  "Calling %unknown_n_unknown..."
  ans  =
     []
 M @= M
- Calling %unknown_n_unknown...
+  "Calling %unknown_n_unknown..."
  ans  =
     []
 M < M
- Calling %unknown_1_unknown...
+  "Calling %unknown_1_unknown..."
  ans  =
     []
 M > M
- Calling %unknown_2_unknown...
+  "Calling %unknown_2_unknown..."
  ans  =
     []
 M <= M
- Calling %unknown_3_unknown...
+  "Calling %unknown_3_unknown..."
  ans  =
     []
 M >= M
- Calling %unknown_4_unknown...
+  "Calling %unknown_4_unknown..."
  ans  =
     []
 M | M
- Calling %unknown_g_unknown...
+  "Calling %unknown_g_unknown..."
  ans  =
     []
 M & M
- Calling %unknown_h_unknown...
+  "Calling %unknown_h_unknown..."
  ans  =
     []
 ~M
- Calling %unknown_5...
+  "Calling %unknown_5..."
  ans  =
     []
 @M
- Calling %unknown_5...
+  "Calling %unknown_5..."
  ans  =
     []
 // Clear all added functions
index c1bd535..3a32192 100644 (file)
@@ -9,6 +9,5 @@ A = spzeros(3,2);
 A(3,1) = 2;
 string(A)
  ans  =
-!(3,2) sparse matrix  !
-!                     !
-!(3,1)    2           !
+  "(3,2) sparse matrix"
+  "(3,1)    2"         
index 6fd9cb7..03ea20a 100644 (file)
@@ -22,21 +22,18 @@ R = [1 2 3] ./ p
  
          column 1
  
-                                                                  
                                  1                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
  
          column 2
  
-                                                                  
                                  2                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
  
          column 3
  
-                                                                  
                                  3                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
@@ -45,33 +42,27 @@ R = [1;1]*[1 2 3] ./ p
  
          column 1
  
-                                                                  
                                  1                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
-                                                                  
                                  1                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
  
          column 2
  
-                                                                  
                                  2                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
-                                                                  
                                  2                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
  
          column 3
  
-                                                                  
                                  3                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
-                                                                  
                                  3                                
    -------------------------------------------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶ +x⁷ +x⁸ +x⁹ +x¹⁰ +x¹¹ +x¹² +x¹³ +x¹⁴  
@@ -81,14 +72,12 @@ R = [1 2 3] ./ p
  
          columns 1 to 2
  
-                                                       
               1                         2              
    ------------------------  ------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶  1 +x +x² +x³ +x⁴ +x⁵ +x⁶  
  
          column 3
  
-                             
               3              
    ------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶  
@@ -97,22 +86,18 @@ R = [1;1]*[1 2 3] ./ p
  
          columns 1 to 2
  
-                                                       
               1                         2              
    ------------------------  ------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶  1 +x +x² +x³ +x⁴ +x⁵ +x⁶  
-                                                       
               1                         2              
    ------------------------  ------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶  1 +x +x² +x³ +x⁴ +x⁵ +x⁶  
  
          column 3
  
-                             
               3              
    ------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶  
-                             
               3              
    ------------------------  
    1 +x +x² +x³ +x⁴ +x⁵ +x⁶  
index 5a1577b..09ef1d6 100644 (file)
@@ -7,14 +7,14 @@
 // =============================================================================
 // <-- TEST WITH GRAPHIC -->
 //
-// These tests makes comparisons between the empirical cumulated 
+// These tests makes comparisons between the empirical cumulated
 // distribution function and the theoretical distribution function.
 // They do not make use of the Chi-square distribution function,
 // and, therefore, are not Kolmogorov-Smirnov tests.
-// The tester is asked to visually compare the two plots, which 
+// The tester is asked to visually compare the two plots, which
 // cannot be automated.
 //
-//Comparison of pseudo-random numbers following an exponential distribution 
+//Comparison of pseudo-random numbers following an exponential distribution
 //and the density of this distribution
 //Parameter of the distribution which can be modified
 lambda=1.6;
@@ -27,13 +27,13 @@ clf();
 classes = linspace(0,12,25);
 //Draw in histogram
 histplot(classes,X);
-//Draw the density 
+//Draw the density
 x=linspace(0,12,25);
 y = (1/lambda)*exp(-(1/lambda)*x);
 plot2d(x,y,3);
 f=gcf();
 delete(f);
-//Comparison of pseudo-random numbers following a beta distribution 
+//Comparison of pseudo-random numbers following a beta distribution
 //and the density of this distribution
 //Parameters of the distribution which can be modified
 A=1;B=3;
@@ -46,13 +46,13 @@ clf();
 classes = linspace(0,1,50);
 //Draw in histogram
 histplot(classes,X);
-//Draw the density 
+//Draw the density
 x=linspace(0,1,50);
 y = (1/(beta(A,B))).*(x.^(A-1)).*((1-x).^(B-1)) ;
 plot2d(x,y,2);
 f=gcf();
 delete(f);
-//Comparison of pseudo-random numbers following a gamma distribution 
+//Comparison of pseudo-random numbers following a gamma distribution
 //and the density of this distribution
 //Parameters of the distribution which can be modified
 A=2;B=1;
@@ -65,13 +65,13 @@ clf();
 classes = linspace(0,2,50);
 //Draw in histogram
 histplot(classes,X);
-//Draw the density 
+//Draw the density
 x=linspace(0,2,50);
 y = (B/(gamma(A))).*exp(-B*x).*(B*x).^(A-1);
 plot2d(x,y,2);
 f=gcf();
 delete(f);
-//Comparison of pseudo-random numbers following a binomial distribution 
+//Comparison of pseudo-random numbers following a binomial distribution
 //and the density of this distribution
 //Parameters of the distribution which can be modified
 n=50;p=0.3;
@@ -90,7 +90,7 @@ y = binomial(p,n);
 plot2d(x,y,2);
 f=gcf();
 delete(f);
-//Comparison of pseudo-random numbers following a poisson distribution 
+//Comparison of pseudo-random numbers following a poisson distribution
 //and the density of this distribution
 //Parameters of the distribution which can be modified
 mu=50;
diff --git a/scilab/modules/renderer/tests/nonreg_tests/bug_15984.dia.ref b/scilab/modules/renderer/tests/nonreg_tests/bug_15984.dia.ref
new file mode 100644 (file)
index 0000000..f4b4f8d
--- /dev/null
@@ -0,0 +1,20 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2019 - Stéphane MOTTELET
+//
+//// This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- TEST WITH GRAPHIC -->
+// <-- MACOSX ONLY-->
+// <-- NO CHECK REF-->
+//
+// <-- Non-regression test for bug 15984 -->
+//
+// <-- Bugzilla URL -->
+// http://bugzilla.scilab.org/15984
+//
+// <-- Short Description -->
+// display scale is wrong for Retina displays under OSX
+plot(1:10,sin(1:10))
+ax = gca();
+assert_checkequal(ax.x_ticks.locations,(1:10)');
index 59b7b08..c4a0103 100644 (file)
@@ -20,6 +20,5 @@ scf(2);
 plot(x,y2,"r.");// %nan & mark_mode "on"
 cd TMPDIR
  ans  =
- TMPDIR   
+  "TMPDIR"
 xs2svg(2,"kaboom.eps");
index f8c042f..a93a30a 100644 (file)
@@ -160,7 +160,7 @@ o.gui
   "BIGSOM_f"
 o.doc
  ans  =
-     ()
+  empty list()
 // Set the block to itself without making any modification
 // (scicos_getvalue returns BIGSOM_f default parameters)
 p = funcprot();
@@ -238,9 +238,9 @@ Xcos debug:   propertyUpdated( 5 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 5 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 5 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 5 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 8 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 7 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 6 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 7 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 8 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 5 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 5 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 5 , BLOCK , GEOMETRY ) : NO_CHANGES
@@ -474,9 +474,9 @@ Xcos debug:   propertyUpdated( 9 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 9 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 9 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 9 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 12 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 11 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 10 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 11 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 12 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 9 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 9 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 9 , BLOCK , GEOMETRY ) : NO_CHANGES
@@ -710,9 +710,9 @@ Xcos debug:   propertyUpdated( 13 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 13 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 13 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 13 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 16 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 15 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 14 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 15 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 16 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 13 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 13 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 13 , BLOCK , GEOMETRY ) : NO_CHANGES
@@ -960,10 +960,10 @@ Xcos debug:   propertyUpdated( 18 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 18 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 18 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 18 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 22 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 21 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 20 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 19 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 20 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 21 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 22 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 18 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 18 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 18 , BLOCK , GEOMETRY ) : NO_CHANGES
@@ -1395,7 +1395,7 @@ o.gui
   "CSCOPE"
 o.doc
  ans  =
-     ()
+  empty list()
 // Set the block to itself without making any modification
 // (scicos_getvalue returns CSCOPE_f default parameters)
 p = funcprot();
@@ -1471,8 +1471,8 @@ Xcos trace:   propertyUpdated( 28 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 26 , BLOCK , EVENT_INPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 26 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 26 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 28 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 27 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 28 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 26 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 26 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 26 , BLOCK , GEOMETRY ) : NO_CHANGES
@@ -1486,7 +1486,7 @@ Xcos trace:   propertyUpdated( 26 , BLOCK , DESCRIPTION ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 27 , PORT , IMPLICIT ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 27 , PORT , STYLE ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 27 , PORT , LABEL ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 26 , BLOCK , STYLE ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 26 , BLOCK , STYLE ) : SUCCESS
 Xcos trace:   objectUnreferenced( 26 , BLOCK ) : 0
 Xcos trace:   objectReferenced( 26 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 26 , BLOCK , SIM_FUNCTION_NAME ) : NO_CHANGES
@@ -1540,7 +1540,7 @@ Xcos trace:   objectUnreferenced( 26 , BLOCK ) : 0
           out_style = ""
           in_label = ""
           out_label = ""
-          style = ""
+          style = "CSCOPE;verticalLabelPosition=bottom;verticalAlign=top;spacing=2;displayedLabel="
 Model   : 
 Xcos trace:   objectReferenced( 26 , BLOCK ) : 1
 Xcos trace:   objectUnreferenced( 26 , BLOCK ) : 0
@@ -1695,11 +1695,7 @@ o.model.opar
 Xcos trace:   objectReferenced( 29 , BLOCK ) : 1
 Xcos trace:   objectUnreferenced( 29 , BLOCK ) : 0
  ans  =
-       ans(1)
-  0
-  0
-  0
-  1
+  (1) : [4x1 int8]
 assert_checkequal(typeof(o.model.opar(1)), "int8");
 Xcos trace:   objectReferenced( 29 , BLOCK ) : 1
 Xcos trace:   objectUnreferenced( 29 , BLOCK ) : 0
@@ -2291,14 +2287,10 @@ Xcos trace:   objectUnreferenced( 34 , BLOCK ) : 0
        ans(4)
   "n"
        ans(5)
-              ans(5)(1)
-  "VA"
-  "f" 
-              ans(5)(2)
-                     ans(5)(2)(1)
-   220.
-                     ans(5)(2)(2)
-   50.
+  (1) : [2x1 string]
+  (2) : list:
+      (1) = 220
+      (2) = 50
 listRef = modelica();
 o.model.equations = listRef;
 Xcos trace:   objectReferenced( 34 , BLOCK ) : 1
@@ -2525,10 +2517,8 @@ Xcos trace:   objectUnreferenced( 37 , BLOCK ) : 0
        ans(6)
   "["R";"L"]"
        ans(7)
-              ans(7)(1)
-  "0.1"
-              ans(7)(2)
-  "0.0001"
+  (1) = "0.1"
+  (2) = "0.0001"
        ans(8)
   "[0;0]"
        ans(9)
@@ -2549,14 +2539,10 @@ Xcos trace:   objectUnreferenced( 37 , BLOCK ) : 0
   "y1"
   "y2"
        ans(5)
-              ans(5)(1)
-  "R"
-  "L"
-              ans(5)(2)
-                     ans(5)(2)(1)
-   0.1
-                     ans(5)(2)(2)
-   0.0001
+  (1) : [2x1 string]
+  (2) : list:
+      (1) = 0.1
+      (2) = 0.0001
 // Test 'exprs' with SuperBlock, CBLOCK, scifunc_block_m and default fortran_block
 // SuperBlock with no parameter
 lS = list([],list([],"Configuration des Paramètres du bloc",list([])));
@@ -2942,142 +2928,52 @@ o.graphics.exprs
 Xcos trace:   objectReferenced( 52 , BLOCK ) : 1
 Xcos trace:   objectUnreferenced( 52 , BLOCK ) : 0
  ans  =
-       ans(1)
-              ans(1)(1)
-  "paramspde"      
-  "a"              
-  "b"              
-  "txt_exp"        
-  "check_op1"      
-  "a1"             
-  "b1"             
-  "check_op2"      
-  "a2"             
-  "b2"             
-  "check_op3"      
-  "a3"             
-  "b3"             
-  "check_op4"      
-  "a4"             
-  "b4"             
-  "check_op5"      
-  "a5"             
-  "b5"             
-  "check_op6"      
-  "a6"             
-  "b6"             
-  "check_op7"      
-  "a7"             
-  "b7"             
-  "discr_cst"      
-  "discr_non_cst"  
-  "signe"          
-  "rad_automatique"
-  "rad_manuel"     
-  "methode"        
-  "ord1"           
-  "ord2"           
-  "ord3"           
-  "degre"          
-  "nnode"          
-  "txt_pas"        
-  "CI"             
-  "dCI"            
-  "CLa"            
-  "CLa_exp"        
-  "CLb"            
-  "CLb_exp"        
-  "points"         
-              ans(1)(2)
-  ""
-              ans(1)(3)
-  ""
-              ans(1)(4)
-  ""
-              ans(1)(5)
-  "0"
-              ans(1)(6)
-  ""
-              ans(1)(7)
-  "IN_EDP1(t)"
-              ans(1)(8)
-  "0"
-              ans(1)(9)
-  ""
-              ans(1)(10)
-  "IN_EDP2(t)"
-              ans(1)(11)
-  "0"
-              ans(1)(12)
-  ""
-              ans(1)(13)
-  "IN_EDP3(t)"
-              ans(1)(14)
-  "0"
-              ans(1)(15)
-  ""
-              ans(1)(16)
-  "IN_EDP4(t)"
-              ans(1)(17)
-  "0"
-              ans(1)(18)
-  ""
-              ans(1)(19)
-  "IN_EDP5(t)"
-              ans(1)(20)
-  "0"
-              ans(1)(21)
-  ""
-              ans(1)(22)
-  "IN_EDP6(t)"
-              ans(1)(23)
-  "0"
-              ans(1)(24)
-  ""
-              ans(1)(25)
-  "IN_EDP7(t)"
-              ans(1)(26)
-  "0"
-              ans(1)(27)
-  "0"
-              ans(1)(28)
-  "0"
-              ans(1)(29)
-  "0"
-              ans(1)(30)
-  "0"
-              ans(1)(31)
-  "0"
-              ans(1)(32)
-  ""
-              ans(1)(33)
-  ""
-              ans(1)(34)
-  ""
-              ans(1)(35)
-  ""
-              ans(1)(36)
-  ""
-              ans(1)(37)
-  ""
-              ans(1)(38)
-  ""
-              ans(1)(39)
-  ""
-              ans(1)(40)
-  "0"
-              ans(1)(41)
-  "IN_CL1(t)"
-              ans(1)(42)
-  "0"
-              ans(1)(43)
-  "IN_CL2(t)"
-              ans(1)(44)
-  ""
-       ans(2)
-    []
-       ans(3)
-  ""
+  (1) : [paramspde] tlist with fields:
+      a = ""
+      b = ""
+      txt_exp = ""
+      check_op1 = "0"
+      a1 = ""
+      b1 = "IN_EDP1(t)"
+      check_op2 = "0"
+      a2 = ""
+      b2 = "IN_EDP2(t)"
+      check_op3 = "0"
+      a3 = ""
+      b3 = "IN_EDP3(t)"
+      check_op4 = "0"
+      a4 = ""
+      b4 = "IN_EDP4(t)"
+      check_op5 = "0"
+      a5 = ""
+      b5 = "IN_EDP5(t)"
+      check_op6 = "0"
+      a6 = ""
+      b6 = "IN_EDP6(t)"
+      check_op7 = "0"
+      a7 = ""
+      b7 = "IN_EDP7(t)"
+      discr_cst = "0"
+      discr_non_cst = "0"
+      signe = "0"
+      rad_automatique = "0"
+      rad_manuel = "0"
+      methode = "0"
+      ord1 = ""
+      ord2 = ""
+      ord3 = ""
+      degre = ""
+      nnode = ""
+      txt_pas = ""
+      CI = ""
+      dCI = ""
+      CLa = "0"
+      CLa_exp = "IN_CL1(t)"
+      CLb = "0"
+      CLb_exp = "IN_CL2(t)"
+      points = ""
+  (2) = []
+  (3) = ""
 // Test 'ipar', 'nzcross' and 'nmode' fields
 o = scicos_block();
 Xcos info:    objectCreated( 60 , BLOCK )
index d27e4bf..e09ff2e 100644 (file)
@@ -448,8 +448,8 @@ Xcos debug:   propertyUpdated( 15 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 15 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 13 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 13 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 15 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 14 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 15 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 13 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 13 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 13 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -555,9 +555,9 @@ Xcos debug:   propertyUpdated( 21 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 21 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 18 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 18 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 21 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 20 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 19 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 20 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 21 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 18 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 18 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 18 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -923,9 +923,9 @@ Xcos debug:   propertyUpdated( 32 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 32 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 30 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 30 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 32 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 31 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 29 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 31 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 32 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 30 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 33 , LINK )
 Xcos info:    objectCloned( 17 , 33 , LINK )
@@ -1002,14 +1002,14 @@ Xcos debug:   propertyUpdated( 37 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 37 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 34 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 34 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 37 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 36 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 35 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 36 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 29 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 31 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 32 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos trace:   propertyUpdated( 33 , LINK , SOURCE_PORT ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 33 , LINK , DESTINATION_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 37 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 34 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 38 , LINK )
 Xcos info:    objectCloned( 23 , 38 , LINK )
@@ -1271,8 +1271,8 @@ Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 43 , BLOCK , EVENT_INPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 43 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 43 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 42 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 43 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 45 , BLOCK )
 Xcos info:    objectCloned( 30 , 45 , BLOCK )
@@ -1325,10 +1325,10 @@ Xcos debug:   propertyUpdated( 47 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 45 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos debug:   propertyUpdated( 45 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 42 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 46 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 45 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 48 , LINK )
 Xcos info:    objectCloned( 33 , 48 , LINK )
@@ -1405,15 +1405,15 @@ Xcos debug:   propertyUpdated( 52 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 52 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 49 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos debug:   propertyUpdated( 49 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 52 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 51 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 50 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 48 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos debug:   propertyUpdated( 48 , LINK , DESTINATION_PORT ) : SUCCESS
-Xcos debug:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos trace:   propertyUpdated( 42 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 46 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos trace:   propertyUpdated( 48 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 48 , LINK , DESTINATION_PORT ) : SUCCESS
+Xcos trace:   propertyUpdated( 50 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 51 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 52 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 49 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 53 , LINK )
 Xcos info:    objectCloned( 38 , 53 , LINK )
@@ -1441,19 +1441,19 @@ Xcos trace:   propertyUpdated( 54 , LINK , PARENT_DIAGRAM ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 54 , LINK , PARENT_BLOCK ) : SUCCESS
 Xcos debug:   propertyUpdated( 54 , LINK , SOURCE_PORT ) : SUCCESS
 Xcos debug:   propertyUpdated( 54 , LINK , DESTINATION_PORT ) : SUCCESS
-Xcos trace:   propertyUpdated( 54 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 54 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 53 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 53 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos debug:   propertyUpdated( 52 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos debug:   propertyUpdated( 51 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos trace:   propertyUpdated( 50 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 48 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 48 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 42 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos debug:   propertyUpdated( 46 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 48 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 48 , LINK , DESTINATION_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 50 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 51 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos debug:   propertyUpdated( 52 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos trace:   propertyUpdated( 53 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 53 , LINK , DESTINATION_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 54 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 54 , LINK , DESTINATION_PORT ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 41 , BLOCK , CHILDREN ) : SUCCESS
 Xcos trace:   objectReferenced( 41 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 41 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -1591,8 +1591,8 @@ Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 58 , BLOCK , EVENT_INPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 58 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 58 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 58 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 60 , BLOCK )
 Xcos info:    objectCloned( 45 , 60 , BLOCK )
@@ -1645,10 +1645,10 @@ Xcos debug:   propertyUpdated( 62 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 60 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos debug:   propertyUpdated( 60 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 60 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 63 , LINK )
 Xcos info:    objectCloned( 48 , 63 , LINK )
@@ -1725,15 +1725,15 @@ Xcos debug:   propertyUpdated( 67 , PORT , SOURCE_BLOCK ) : SUCCESS
 Xcos trace:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 64 , BLOCK , EVENT_OUTPUTS ) : SUCCESS
 Xcos debug:   propertyUpdated( 64 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 66 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 65 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 63 , LINK , SOURCE_PORT ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 63 , LINK , DESTINATION_PORT ) : SUCCESS
-Xcos debug:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos trace:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos trace:   propertyUpdated( 65 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 66 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 64 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 68 , LINK )
 Xcos info:    objectCloned( 53 , 68 , LINK )
@@ -1761,33 +1761,33 @@ Xcos trace:   propertyUpdated( 69 , LINK , PARENT_DIAGRAM ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 69 , LINK , PARENT_BLOCK ) : SUCCESS
 Xcos debug:   propertyUpdated( 69 , LINK , SOURCE_PORT ) : SUCCESS
 Xcos debug:   propertyUpdated( 69 , LINK , DESTINATION_PORT ) : SUCCESS
-Xcos trace:   propertyUpdated( 69 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 69 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 68 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 68 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos debug:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos debug:   propertyUpdated( 66 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos trace:   propertyUpdated( 65 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 63 , LINK , SOURCE_PORT ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 63 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos debug:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos debug:   propertyUpdated( 56 , BLOCK , CHILDREN ) : SUCCESS
-Xcos trace:   propertyUpdated( 69 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 69 , LINK , DESTINATION_PORT ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 65 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 66 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos debug:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos trace:   propertyUpdated( 68 , LINK , SOURCE_PORT ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 68 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 66 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 65 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 69 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 69 , LINK , DESTINATION_PORT ) : NO_CHANGES
+Xcos debug:   propertyUpdated( 56 , BLOCK , CHILDREN ) : SUCCESS
 Xcos trace:   propertyUpdated( 63 , LINK , SOURCE_PORT ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 63 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 61 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 62 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 65 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 66 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 67 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 68 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 68 , LINK , DESTINATION_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 69 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 69 , LINK , DESTINATION_PORT ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 55 , DIAGRAM , CHILDREN ) : SUCCESS
 Xcos trace:   objectReferenced( 55 , DIAGRAM ) : 1
 Xcos trace:   objectUnreferenced( 55 , DIAGRAM ) : 0
index 31c444a..f5b7ffe 100644 (file)
@@ -176,8 +176,8 @@ Xcos debug:   propertyUpdated( 7 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 7 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 7 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 7 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 9 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 8 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 9 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 7 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 7 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 7 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -298,8 +298,8 @@ Xcos debug:   propertyUpdated( 11 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 11 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 11 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 11 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 13 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 12 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 13 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 11 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 14 , LINK )
 Xcos info:    objectCloned( 10 , 14 , LINK )
@@ -477,8 +477,8 @@ Xcos debug:   propertyUpdated( 17 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 17 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 17 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 17 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 19 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 18 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 19 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 17 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 20 , LINK )
 Xcos info:    objectCloned( 14 , 20 , LINK )
@@ -493,10 +493,10 @@ Xcos trace:   propertyUpdated( 20 , LINK , PARENT_DIAGRAM ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 20 , LINK , PARENT_BLOCK ) : SUCCESS
 Xcos debug:   propertyUpdated( 20 , LINK , SOURCE_PORT ) : SUCCESS
 Xcos debug:   propertyUpdated( 20 , LINK , DESTINATION_PORT ) : SUCCESS
+Xcos debug:   propertyUpdated( 18 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos debug:   propertyUpdated( 19 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos trace:   propertyUpdated( 20 , LINK , SOURCE_PORT ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 20 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos debug:   propertyUpdated( 19 , PORT , CONNECTED_SIGNALS ) : SUCCESS
-Xcos debug:   propertyUpdated( 18 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos debug:   propertyUpdated( 16 , BLOCK , CHILDREN ) : SUCCESS
 Xcos trace:   objectReferenced( 16 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 16 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -890,9 +890,9 @@ Xcos debug:   propertyUpdated( 32 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 32 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 32 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 32 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 35 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 34 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 33 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 34 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 35 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 32 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 32 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 32 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -963,9 +963,9 @@ Xcos debug:   propertyUpdated( 36 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 36 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 36 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 36 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 39 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 38 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 37 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 38 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 39 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 36 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 36 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 36 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -1127,9 +1127,9 @@ Xcos debug:   propertyUpdated( 41 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 41 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 41 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 41 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 43 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 42 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 43 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 41 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 45 , BLOCK )
 Xcos info:    objectCloned( 36 , 45 , BLOCK )
@@ -1193,12 +1193,12 @@ Xcos debug:   propertyUpdated( 45 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 45 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 45 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 45 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 48 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 42 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 43 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 44 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 46 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 47 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 48 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 45 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 49 , LINK )
 Xcos info:    objectCloned( 40 , 49 , LINK )
@@ -1352,9 +1352,9 @@ Xcos debug:   propertyUpdated( 52 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 52 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 52 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 52 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 55 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 54 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 53 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 54 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 55 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 52 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 56 , BLOCK )
 Xcos info:    objectCloned( 45 , 56 , BLOCK )
@@ -1418,12 +1418,12 @@ Xcos debug:   propertyUpdated( 56 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 56 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 56 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 56 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 58 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 53 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 54 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 55 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 58 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 56 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos info:    objectCreated( 60 , LINK )
 Xcos info:    objectCloned( 49 , 60 , LINK )
@@ -1438,14 +1438,14 @@ Xcos trace:   propertyUpdated( 60 , LINK , PARENT_DIAGRAM ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 60 , LINK , PARENT_BLOCK ) : SUCCESS
 Xcos debug:   propertyUpdated( 60 , LINK , SOURCE_PORT ) : SUCCESS
 Xcos debug:   propertyUpdated( 60 , LINK , DESTINATION_PORT ) : SUCCESS
-Xcos trace:   propertyUpdated( 60 , LINK , SOURCE_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 60 , LINK , DESTINATION_PORT ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 58 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos debug:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : SUCCESS
 Xcos trace:   propertyUpdated( 53 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 54 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 55 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos debug:   propertyUpdated( 57 , PORT , CONNECTED_SIGNALS ) : SUCCESS
+Xcos trace:   propertyUpdated( 58 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 59 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 60 , LINK , SOURCE_PORT ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 60 , LINK , DESTINATION_PORT ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 51 , BLOCK , CHILDREN ) : SUCCESS
 Xcos trace:   objectReferenced( 51 , BLOCK ) : 1
 Xcos debug:   propertyUpdated( 51 , BLOCK , PARENT_DIAGRAM ) : SUCCESS
@@ -2243,8 +2243,8 @@ Xcos trace:   propertyUpdated( 75 , BLOCK , OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 75 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 75 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 75 , BLOCK , PARENT_BLOCK ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 76 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 74 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   propertyUpdated( 76 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 75 , BLOCK , CHILDREN ) : NO_CHANGES
 Xcos trace:   objectReferenced( 73 , BLOCK ) : 1
 Xcos trace:   propertyUpdated( 73 , BLOCK , PARENT_DIAGRAM ) : NO_CHANGES
@@ -2405,9 +2405,9 @@ Xcos debug:   propertyUpdated( 81 , BLOCK , OUTPUTS ) : SUCCESS
 Xcos trace:   propertyUpdated( 81 , BLOCK , EVENT_INPUTS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 81 , BLOCK , EVENT_OUTPUTS ) : NO_CHANGES
 Xcos debug:   propertyUpdated( 81 , BLOCK , PARENT_BLOCK ) : SUCCESS
-Xcos trace:   propertyUpdated( 82 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
-Xcos trace:   propertyUpdated( 80 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
 Xcos trace:   propertyUpdated( 79 , PORT , CONNECTED_SIGNALS ) : NO_CHANGES
+Xcos trace:   prope