- Add references
Pierre Marechal [Tue, 3 Jun 2008 08:44:22 +0000 (08:44 +0000)]
scilab/modules/parameters/tests/unit_tests/add_param.dia.ref [new file with mode: 0644]
scilab/modules/parameters/tests/unit_tests/get_param.dia.ref [new file with mode: 0644]
scilab/modules/parameters/tests/unit_tests/init_param.dia.ref [new file with mode: 0644]
scilab/modules/parameters/tests/unit_tests/is_param.dia.ref [new file with mode: 0644]
scilab/modules/parameters/tests/unit_tests/list_param.dia.ref [new file with mode: 0644]
scilab/modules/parameters/tests/unit_tests/remove_param.dia.ref [new file with mode: 0644]
scilab/modules/parameters/tests/unit_tests/set_param.dia.ref [new file with mode: 0644]

diff --git a/scilab/modules/parameters/tests/unit_tests/add_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/add_param.dia.ref
new file mode 100644 (file)
index 0000000..b45b77d
--- /dev/null
@@ -0,0 +1,11 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+test_list = add_param(test_list,'test',%T);
+if ~is_param(test_list,'test') then bugmes();quit;end
diff --git a/scilab/modules/parameters/tests/unit_tests/get_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/get_param.dia.ref
new file mode 100644 (file)
index 0000000..7286cf3
--- /dev/null
@@ -0,0 +1,11 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+test_list = add_param(test_list,'test',%T);
+if get_param(test_list,'test')~=%T then bugmes();quit;end
diff --git a/scilab/modules/parameters/tests/unit_tests/init_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/init_param.dia.ref
new file mode 100644 (file)
index 0000000..2915eae
--- /dev/null
@@ -0,0 +1,10 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+if typeof(test_list)~='plist' then bugmes();quit;end
diff --git a/scilab/modules/parameters/tests/unit_tests/is_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/is_param.dia.ref
new file mode 100644 (file)
index 0000000..b45b77d
--- /dev/null
@@ -0,0 +1,11 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+test_list = add_param(test_list,'test',%T);
+if ~is_param(test_list,'test') then bugmes();quit;end
diff --git a/scilab/modules/parameters/tests/unit_tests/list_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/list_param.dia.ref
new file mode 100644 (file)
index 0000000..03437c2
--- /dev/null
@@ -0,0 +1,13 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+test_list = add_param(test_list,'param_1',1);
+test_list = add_param(test_list,'param_2',2);
+list_of_params = list_param(test_list);
+if size(list_of_params,2)~=2 then bugmes();quit;end
diff --git a/scilab/modules/parameters/tests/unit_tests/remove_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/remove_param.dia.ref
new file mode 100644 (file)
index 0000000..dd597c3
--- /dev/null
@@ -0,0 +1,12 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+test_list = add_param(test_list,'test',%T);
+test_list = remove_param(test_list,'test');
+if is_param(test_list,'test') then bugmes();quit;end
diff --git a/scilab/modules/parameters/tests/unit_tests/set_param.dia.ref b/scilab/modules/parameters/tests/unit_tests/set_param.dia.ref
new file mode 100644 (file)
index 0000000..7286cf3
--- /dev/null
@@ -0,0 +1,11 @@
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - Yann COLLETTE <yann.collette@renault.com>
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+test_list = init_param();
+test_list = add_param(test_list,'test',%T);
+if get_param(test_list,'test')~=%T then bugmes();quit;end