[Libreoffice-commits] core.git: basic/qa

[Arnaud Versini]

 basic/qa/basic_coverage/test_math_methods.vb |   40 ++++++++-------------------
 1 file changed, 13 insertions(+), 27 deletions(-)

New commits:
commit 8d43bc6ce87001a73cac9842678bcd04b87a61a0
Author: Arnaud Versini <arnaud.versini at gmail.com>
Date:   Sun Dec 4 10:46:27 2016 +0100

    basic: cleanup test_math_methods
    
    Change-Id: I11b3ca4c55151de7403ff9980ada9958d8ef12dc
    Reviewed-on: https://gerrit.libreoffice.org/31592
    Tested-by: Jenkins <ci at libreoffice.org>
    Reviewed-by: Laurent BP <laurent.balland-poirier at laposte.net>

diff --git a/basic/qa/basic_coverage/test_math_methods.vb b/basic/qa/basic_coverage/test_math_methods.vb
index 28f27b8..edb90d1 100644
--- a/basic/qa/basic_coverage/test_math_methods.vb
+++ b/basic/qa/basic_coverage/test_math_methods.vb
@@ -12,62 +12,48 @@ Function doUnitTest as Integer
     ' ABS
     If (Abs(-3.5) <> 3.5) Then
         doUnitTest = 0
-    Else If (Abs(3.5) <> 3.5) Then
+    ElseIf (Abs(3.5) <> 3.5) Then
         doUnitTest = 0
     ' ATN
-    Else If (Atn(1) <> PI/4) Then
+    ElseIf (Atn(1) <> PI/4) Then
         doUnitTest = 0
     ' COS SIN
-    Else If ( Abs(Cos(PI/3) - Sin(PI/6)) > 1E-6 ) Then
+    ElseIf ( Abs(Cos(PI/3) - Sin(PI/6)) > 1E-6 ) Then
         doUnitTest = 0
     ' EXP LOG
-    Else If ( Log( Exp(1) ) <> 1 ) Then
+    ElseIf ( Log( Exp(1) ) <> 1 ) Then
         doUnitTest = 0
     ' FIX
-    Else If (Fix(PI) <> 3) Then
+    ElseIf (Fix(PI) <> 3) Then
         doUnitTest = 0
     ' FRAC
-    Else If ( 3+Frac(PI) <> PI) Then
+    ElseIf ( 3+Frac(PI) <> PI) Then
         doUnitTest = 0
     ' HEX
-    Else If ( Hex(100) <> "64") Then
+    ElseIf ( Hex(100) <> "64") Then
         doUnitTest = 0
     ' INT
-    Else If ( Int(PI) <> 3 ) Then
+    ElseIf ( Int(PI) <> 3 ) Then
         doUnitTest = 0
     ' OCT
-    Else If ( Oct(100) <> "144" ) Then
+    ElseIf ( Oct(100) <> "144" ) Then
         doUnitTest = 0
     ' ROUND
     ' Else If ( Round( PI, 2 ) <> 3.14 ) Then
     '    doUnitTest = 0
     ' RND
-    Else If ( Rnd >= 1 ) Then
+    ElseIf ( Rnd >= 1 ) Then
         doUnitTest = 0
     ' SGN
-    Else If ( Sgn(aVector(3)) <> -1 ) Then
+    ElseIf ( Sgn(aVector(3)) <> -1 ) Then
         doUnitTest = 0
     ' SQR
-    Else If ( Sqr( 4 ) <> 2 ) Then
+    ElseIf ( Sqr( 4 ) <> 2 ) Then
         doUnitTest = 0
     ' TAN
-    Else If ( Abs( Tan(PI/4) - 1 ) > 1E-6 ) Then
+    ElseIf ( Abs( Tan(PI/4) - 1 ) > 1E-6 ) Then
         doUnitTest = 0
     Else
         doUnitTest = 1
     End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    End If
-    'End If
 End Function