Fix test after https://codereview.scilab.org/#/c/15593/ 07/15607/2
Vincent COUVERT [Fri, 28 Nov 2014 15:53:27 +0000 (16:53 +0100)]
In Scilab, log10(x) is no more computed using log(x)/log(10) but using C function.

Change-Id: I877fff6a4e309664de18afb1058ee4ce70bbee4f

scilab/modules/development_tools/tests/unit_tests/assert/computedigits.dia.ref
scilab/modules/development_tools/tests/unit_tests/assert/computedigits.tst

index 82deae5..3e37773 100644 (file)
@@ -9,16 +9,16 @@
 // <-- CLI SHELL MODE -->
 // <-- ENGLISH IMPOSED -->
 function flag = MY_assert_equal ( computed , expected )
-  if computed==expected then
-    flag = 1;
-  else
-    flag = 0;
-  end
-  if flag <> 1 then bugmes();quit;end
+    if computed==expected then
+        flag = 1;
+    else
+        flag = 0;
+    end
+    if flag <> 1 then bugmes();quit;end
 endfunction
 format("v",10);
 //
-dmax = -log10(2^(-53));
+dmax = -log(2^(-53))/log(10);
 //
 computed = assert_computedigits ( 1 , 1 );
 MY_assert_equal ( computed , dmax );
@@ -77,7 +77,7 @@ ieee(back);
 a = [
 3.982729777831130693D-59
 2.584939414228211484D-26
-4.391531370352049090D+43 
+4.391531370352049090D+43
 1.725436586898508346D+68
 ];
 b = [
@@ -88,18 +88,18 @@ b = [
 ];
 c = assert_computedigits ( a , b , 2 );
 e = [
-    53.        
-    53.        
-    51.977632  
-    51.678072  
+53.
+53.
+51.977632
+51.678072
 ];
 assert_checkalmostequal ( c , e , 1.e-7 );
 //
-// Check that the vectorization was correct, i.e. no specific  
+// Check that the vectorization was correct, i.e. no specific
 // case in the processing of the data is forgotten.
 //
 function pI = permInverse(p)
-    // Given the permutation p, compute the 
+    // Given the permutation p, compute the
     // inverse permutation pI.
     N = size(p,"*")
     pI(p) = (1:N)'
index a16f529..cc4361e 100644 (file)
 // <-- ENGLISH IMPOSED -->
 
 function flag = MY_assert_equal ( computed , expected )
-  if computed==expected then
-    flag = 1;
-  else
-    flag = 0;
-  end
-  if flag <> 1 then pause,end
+    if computed==expected then
+        flag = 1;
+    else
+        flag = 0;
+    end
+    if flag <> 1 then pause,end
 endfunction
 
 format("v",10);
 
 //
-dmax = -log10(2^(-53));
+dmax = -log(2^(-53))/log(10);
 //
 computed = assert_computedigits ( 1 , 1 );
 MY_assert_equal ( computed , dmax );
@@ -82,7 +82,7 @@ ieee(back);
 a = [
 3.982729777831130693D-59
 2.584939414228211484D-26
-4.391531370352049090D+43 
+4.391531370352049090D+43
 1.725436586898508346D+68
 ];
 b = [
@@ -93,18 +93,18 @@ b = [
 ];
 c = assert_computedigits ( a , b , 2 );
 e = [
-    53.        
-    53.        
-    51.977632  
-    51.678072  
+53.
+53.
+51.977632
+51.678072
 ];
 assert_checkalmostequal ( c , e , 1.e-7 );
 //
-// Check that the vectorization was correct, i.e. no specific  
+// Check that the vectorization was correct, i.e. no specific
 // case in the processing of the data is forgotten.
 //
 function pI = permInverse(p)
-    // Given the permutation p, compute the 
+    // Given the permutation p, compute the
     // inverse permutation pI.
     N = size(p,"*")
     pI(p) = (1:N)'