[integer] test updated. 00/17800/2
Cedric Delamarre [Fri, 12 Feb 2016 08:53:48 +0000 (09:53 +0100)]
Change-Id: I2de7bfd5e9dbd833776dea602742eb17914ec45b

scilab/modules/integer/tests/nonreg_tests/bug_4024.dia.ref
scilab/modules/integer/tests/nonreg_tests/bug_4024.tst

index 25e3bef..0bd739b 100644 (file)
@@ -4,6 +4,8 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
+//
+//
 // <-- Non-regression test for bug 4024 -->
 //
 // <-- Bugzilla URL -->
 // <-- Short Description -->
 //    The addition between empty matrix and and integer type array returns empty.
 //    This is not compatible with []+A -->A
-mm=mtlb_mode();
-mtlb_mode(%f)
-if []+int32(2)<>int32(2) then bugmes();quit;end
-if int32(2)+[]<>int32(2) then bugmes();quit;end
-if []-int32(2)<>-int32(2) then bugmes();quit;end
-if int32(2)-[]<>int32(2) then bugmes();quit;end
-mtlb_mode(%t)
+warning("off"); // WARNING_EMPTY_OPS
+if []+int32(2)==int32(2) then bugmes();quit;end
+if int32(2)+[]==int32(2) then bugmes();quit;end
+if []-int32(2)==-int32(2) then bugmes();quit;end
+if int32(2)-[]==int32(2) then bugmes();quit;end
 if []+int32(2)<>[] then bugmes();quit;end
 if int32(2)+[]<>[] then bugmes();quit;end
 if []-int32(2)<>[] then bugmes();quit;end
 if int32(2)-[]<>[] then bugmes();quit;end
-mtlb_mode(mm)
index 61fe494..67a5f99 100644 (file)
@@ -5,7 +5,6 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 //
-// <-- NOT FIXED -->
 //
 // <-- Non-regression test for bug 4024 -->
 //
 // http://bugzilla.scilab.org/show_bug.cgi?id=4024
 //
 // <-- Short Description -->
-//    The addition between empty matrix and and integer type array returns empty. 
+//    The addition between empty matrix and and integer type array returns empty.
 //    This is not compatible with []+A -->A
-mm=mtlb_mode();
-mtlb_mode(%f)
-if []+int32(2)<>int32(2) then pause,end
-if int32(2)+[]<>int32(2) then pause,end
-if []-int32(2)<>-int32(2) then pause,end
-if int32(2)-[]<>int32(2) then pause,end
-mtlb_mode(%t)
+
+warning("off"); // WARNING_EMPTY_OPS
+
+if []+int32(2)==int32(2) then pause,end
+if int32(2)+[]==int32(2) then pause,end
+if []-int32(2)==-int32(2) then pause,end
+if int32(2)-[]==int32(2) then pause,end
+
 if []+int32(2)<>[] then pause,end
 if int32(2)+[]<>[] then pause,end
 if []-int32(2)<>[] then pause,end
 if int32(2)-[]<>[] then pause,end
-mtlb_mode(mm)
+