Fixed tests in module io 56/17656/3
Pierre-Aime Agnel [Fri, 8 Jan 2016 16:59:15 +0000 (17:59 +0100)]
Change-Id: I01c8ec7caf8bce20584c856dcc55a44c911a1f8a

scilab/modules/io/tests/nonreg_tests/bug_14097.dia.ref
scilab/modules/io/tests/nonreg_tests/bug_14097.tst
scilab/modules/io/tests/nonreg_tests/bug_1969.dia.ref
scilab/modules/io/tests/nonreg_tests/bug_1969.tst
scilab/modules/io/tests/nonreg_tests/bug_2389.dia.ref
scilab/modules/io/tests/nonreg_tests/bug_2389.tst
scilab/modules/io/tests/nonreg_tests/bug_3906.tst [deleted file]
scilab/modules/io/tests/nonreg_tests/bug_5586.dia.ref

index 96b0305..e2e50da 100644 (file)
 // <-- Short Description -->
 //
 // genlib no more adds a separator at the end of the lib path if it is not given in the directory path.
-ref = pathconvert("SCI/modules/string/macros/");
-genlib("slib", "SCI/modules/string/macros");
-s1=string(slib)(1);
+createdir(TMPDIR + "/macros");
+macro_dir = pathconvert("TMPDIR/macros");
+macro_foo = ["function [] = foo()"; ...
+"endfunction"];
+mputl(macro_foo, macro_dir + "foo.sci");
+ref = pathconvert("TMPDIR/macros/");
+genlib("foolib", TMPDIR + "/macros");
+s1=string(foolib)(1);
 assert_checkequal(s1, ref);
-clear slib
-genlib("slib", "SCI/modules/string/macros/");
-s2=string(slib)(1);
+clear foolib;
+genlib("foolib", TMPDIR + "/macros/");
+s2=string(foolib)(1);
 assert_checkequal(s2, ref);
-clear slib
+clear foolib;
index 8c41630..3fe981e 100644 (file)
 //
 // genlib no more adds a separator at the end of the lib path if it is not given in the directory path.
 
-ref = pathconvert("SCI/modules/string/macros/");
-genlib("slib", "SCI/modules/string/macros");
-s1=string(slib)(1);
+createdir(TMPDIR + "/macros");
+macro_dir = pathconvert("TMPDIR/macros");
+macro_foo = ["function [] = foo()"; ...
+"endfunction"];
+mputl(macro_foo, macro_dir + "foo.sci");
+
+ref = pathconvert("TMPDIR/macros/");
+genlib("foolib", TMPDIR + "/macros");
+s1=string(foolib)(1);
 assert_checkequal(s1, ref);
-clear slib
+clear foolib;
 
-genlib("slib", "SCI/modules/string/macros/");
-s2=string(slib)(1);
+genlib("foolib", TMPDIR + "/macros/");
+s2=string(foolib)(1);
 assert_checkequal(s2, ref);
-clear slib
+clear foolib;
 
index 1f3e850..e1fab32 100644 (file)
 //
 // <-- Short Description -->
 // Bad exec was causing a seg fault of Scilab
-s=grand(500,1,'nor',0,1)';
-a=msprintf("%2.5f ",s')
- a  =
- 0.43889 -1.02880 0.19793 0.38339 -1.06828 0.03888 0.17882 -0.71694 1.0 
-      4330 -0.45655 -1.20855 1.53101 -0.54048 -0.82732 1.53406 2.61700  
-      2.84318 0.04174 -0.94128 0.70100 0.03455 0.00816 0.06824 -1.14788 
-       -2.38379 0.47906 -0.48834 -1.00455 -1.93925 -0.15732 -1.13468 0. 
-      17277 1.07457 1.98954 0.96696 0.34564 -0.74600 0.12648 0.85101 0. 
-      86101 -0.21620 0.60216 0.65443 0.64649 -0.02410 -0.23305 -0.15677 
-       0.95777 -0.90515 0.76632 0.48762 -1.66909 -0.43378 -0.54521 0.28 
-      401 -1.55527 -1.21085 2.54329 0.41883 0.80399 -1.07667 -0.43225 0 
-      .58356 0.08560 -2.20930 -1.49510 0.49263 -1.61494 -0.85366 -2.235 
-      66 -0.09732 -2.30976 0.49621 0.75485 0.15959 0.61160 0.45837 -0.5 
-      4790 0.76726 0.85732 -2.02742 0.94758 0.75022 -0.92110 0.99561 -1 
-      .10153 -0.07109 -3.02853 0.06175 1.33456 -0.36866 0.27309 1.27262 
-       0.45653 -0.70772 -1.82436 0.62218 0.42067 -0.61034 0.42180 1.886 
-      60 0.11126 0.78861 -0.18064 0.23648 -0.15403 0.06289 1.30001 1.53 
-      106 -0.93948 -1.01417 0.58981 -0.97261 -0.68667 -0.60287 0.45208  
-      0.36775 2.21116 0.19424 -0.79760 0.34742 -0.62275 0.07365 1.11651 
-       0.53928 -0.02779 2.31345 0.49732 1.27264 1.22562 1.50852 0.67791 
-       0.16903 0.80253 -0.51999 0.85688 0.60383 -0.23281 0.61456 1.4734 
-      3 1.69011 -0.20203 -1.47053 -0.33586 1.68315 0.12643 0.04861 -1.0 
-      5470 -0.95043 1.37103 -0.22611 -0.03757 -0.24549 -1.90995 0.14302 
-       0.49531 -0.12107 -0.44785 0.30988 1.71541 -0.58597 -0.36911 0.95 
-      198 1.79247 2.28240 0.71873 -1.28181 0.18087 -0.69058 1.90717 0.1 
-      7892 1.43172 -0.95931 2.01075 0.40790 -0.05488 1.59259 1.60327 -1 
-      .15734 -2.98950 0.01113 -1.94595 -1.63990 0.55125 0.01847 0.43168 
-       -0.30853 0.29391 0.85802 -1.27790 -0.35344 -0.21349 0.32747 -0.5 
-      9557 -1.57154 0.63361 0.00502 -0.58340 -1.22084 -0.98880 -0.52925 
-       -1.02605 0.47383 0.29233 -1.36578 -1.90493 0.85510 0.33513 1.644 
-      41 1.08602 -0.11482 -0.34073 -0.78690 1.90291 -0.20825 -0.25849 - 
-      1.31820 0.58767 -0.65677 -1.56758 -1.07961 -0.61695 -0.84130 1.93 
-      981 -0.65665 0.41687 -0.16885 0.00662 -1.50914 0.41450 0.20590 -0 
-      .47464 0.09934 -1.52451 -2.19854 -2.25293 -0.37596 0.24437 0.2127 
-      9 -0.35989 -0.29245 -1.65222 -1.14108 -0.92005 0.53521 0.27150 -0 
-      .23910 -0.75161 -0.65109 -0.55773 -0.20280 -2.44956 0.10626 0.073 
-      84 0.07084 0.96108 1.32381 0.60289 -1.41814 -0.12329 -0.67319 1.4 
-      8014 -0.33479 -1.47770 0.42082 -0.41714 -2.08968 -0.89534 0.45378 
-       0.97338 -0.60044 0.68148 -1.05498 0.97928 -2.58933 -0.26852 1.53 
-      292 0.73990 -0.51425 0.64150 1.07902 -0.82525 0.44597 0.84821 -0. 
-      84281 -0.24964 -0.29447 -0.35965 1.07464 0.43597 0.53529 0.89415  
-      -1.29894 -0.26612 0.13820 -0.06489 0.54884 -0.46955 -2.33599 -0.1 
-      2173 -2.27436 0.60819 -0.46174 -1.19078 -0.22953 1.90453 1.58782  
-      -1.04358 0.08888 -0.34134 2.22400 -0.65626 0.27522 -1.84674 1.504 
-      63 -0.24204 1.08389 0.53690 1.26132 -0.01938 -0.76046 1.57149 -0. 
-      47630 -1.81227 -0.03372 0.21245 -0.68557 -0.80519 0.35862 0.24889 
-       -0.80422 -0.10835 -0.70072 -0.97893 -0.88841 -0.65809 -0.69494 0 
-      .48085 -0.12214 -0.02847 -0.44818 -1.24366 0.15348 0.99306 -0.136 
-      11 1.04002 -0.83784 1.27824 0.20029 0.69829 0.01158 -0.33080 -0.1 
-      1431 0.85464 -1.14150 0.76192 -0.60115 -0.92224 -0.19077 -1.03690 
-       1.22342 -0.08728 -0.58832 -1.54898 1.17875 0.48738 0.74845 -0.90 
-      114 -0.71457 0.39379 -1.10955 -0.41029 -0.50693 -0.15148 0.53148  
-      1.89569 -1.27104 2.57643 0.58610 -1.72561 0.13955 -0.64327 0.6860 
-      9 -1.19058 -2.27466 1.31547 -0.53231 -0.66519 0.03936 -0.06401 -0 
-      .73962 0.05333 1.16141 1.56697 -0.20886 -2.26491 1.08991 0.85948  
-      -0.48256 -0.22454 1.02419 -0.29725 -0.96278 2.29582 -1.59969 0.25 
-      421 0.25107 0.06307 0.17905 -1.81914 0.48975 1.28800 -1.20197 0.5 
-      7544 -0.58938 -0.40237 -0.38244 -1.05861 0.85723 -0.50210 -1.0238 
-      0 0.35108 0.71629 -0.68465 -1.15673 2.06529 0.95336 -2.08218 -2.4 
-      8706 -1.20204 0.20330 -0.25215 0.23643 -0.32889 -0.38571 0.72046  
-      0.78981 -1.39602 -0.79320 1.87162 -0.15196 0.64348 0.82218 2.1528 
-      7 -0.61390 -0.01114 -0.20899 0.20070 -0.58132 1.14786 0.12582 1.1 
-      0829 -0.02970 0.31846 1.14253 0.46419 -2.28165 1.95968 0.24755 2. 
-      04788 -1.70731 0.05356 0.01426 -0.67923 0.74334 0.63443 2.13271 - 
-      0.41708 -0.03331 -0.42909 -1.41958 0.07991 0.84868 1.63515 -1.544 
-      55 0.28566 -1.35164 0.12493 1.75515 0.90292 -1.21311 -0.50874 0.4 
-      2932 -1.39543 0.43100 -0.68092 0.71227 0.77090 -0.97015 -0.80298  
-      0.93324 -0.15644 1.80970 0.12123 0.02858 -1.00312 0.97391 0.99897 
-       0.47892 -0.02918                                                 
-if getos() <> 'Windows' then
-       if unix("cat "+a+" > /dev/null 2>&1")<>256 then bugmes();quit;end
+s=grand(500,1,"nor",0,1)';
+a=msprintf("%2.5f ",s');
+if getos() <> "Windows" then
+    // cat will exit in error
+    // scilab must not crash
+    if unix("cat "+a+" > /dev/null 2>&1")==0 then bugmes();quit;end
 end
index 07f10e7..03a37db 100644 (file)
@@ -4,7 +4,6 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-// <-- NOT FIXED -->
 // <-- Non-regression test for bug 1969 -->
 //
 // <-- Bugzilla URL -->
 // <-- Short Description -->
 // Bad exec was causing a seg fault of Scilab
 
-s=grand(500,1,'nor',0,1)';
-a=msprintf("%2.5f ",s')
+s=grand(500,1,"nor",0,1)';
+a=msprintf("%2.5f ",s');
 
-if getos() <> 'Windows' then
-       if unix("cat "+a+" > /dev/null 2>&1")<>256 then pause,end
+if getos() <> "Windows" then
+    // cat will exit in error
+    // scilab must not crash
+    if unix("cat "+a+" > /dev/null 2>&1")==0 then pause,end
 end
index 30f8430..aa6701a 100644 (file)
@@ -5,7 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- Non-regression test for bug 2389 -->
-//
+// <-- CLI SHELL MODE -->
 // <-- Bugzilla URL -->
 // http://bugzilla.scilab.org/show_bug.cgi?id=2389
 //
@@ -13,4 +13,6 @@
 //   handle objects cannot be saved
 A       = sparse(rand(5,5));
 [h,rk]  = lufact(A);
-if execstr("save(TMPDIR+""/pointer.bin"",""h"")", "errcatch")<>0 then bugmes();quit;end
+// No possibility to save a pointer
+if execstr("save(TMPDIR+""/pointer.bin"",""h"")", "errcatch")==0 then bugmes();quit;end
+ludel(h);
index 26422ee..541bf93 100644 (file)
@@ -16,6 +16,7 @@
 A       = sparse(rand(5,5));
 [h,rk]  = lufact(A);
 
-if execstr("save(TMPDIR+""/pointer.bin"",""h"")", "errcatch")<>0 then pause,end
+// No possibility to save a pointer
+if execstr("save(TMPDIR+""/pointer.bin"",""h"")", "errcatch")==0 then pause,end
 
 ludel(h);
diff --git a/scilab/modules/io/tests/nonreg_tests/bug_3906.tst b/scilab/modules/io/tests/nonreg_tests/bug_3906.tst
deleted file mode 100644 (file)
index d2b3611..0000000
+++ /dev/null
@@ -1,25 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2008 - DIGITEO - Allan CORNET
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-
-// <-- Non-regression test for bug 39065 -->
-//
-
-// <-- Short Description -->
-//There is no way to know if the path returned by get_absolute_file_path() is the good one or not :
-//if the input argument is not an opened file, the current directory is returned.
-//=> It should return an error instead of just printing a message.
-
-//
-// <-- Bugzilla URL -->
-// http://bugzilla.scilab.org/show_bug.cgi?id=3906
-//
-
-// <-- INTERACTIVE TEST -->
-// executes next line and checks that scilab not crashs
-
-debug(4);exit
-
index 784b4b5..63f7548 100644 (file)
@@ -5,16 +5,14 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <-- Non-regression test for bug 5586 -->
+// <-- CLI SHELL MODE -->
 // <-- Short Description -->
 // getscilabkeywords() was broken
 //
 // <-- Bugzilla URL -->
 // http://bugzilla.scilab.org/show_bug.cgi?id=5586
-// 
-ierr = execstr('getscilabkeywords()','errcatch')
- ierr  =
-    0.  
+//
+ierr = execstr("getscilabkeywords()","errcatch");
 if ierr <> 0 then bugmes();quit;end;
 r = getscilabkeywords();
 if r == [] then bugmes();quit;end;