From 4e73d75b03399fe7424b6f73bdc48e3c47e91f27 Mon Sep 17 00:00:00 2001
From: abv <abv@opencascade.com>
Date: Tue, 5 Jun 2018 16:38:45 +0300
Subject: [PATCH] 0029826: Tests - test case perf/fclasses/strtod is unstable

Check of performance of accelerated Strtod() vs. standard strtod() in the test is relaxed: now test passes if Strtod() is at least 1.5 times faster
---
 tests/perf/fclasses/strtod | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/perf/fclasses/strtod b/tests/perf/fclasses/strtod
index aa4c254e44..50a7369a71 100644
--- a/tests/perf/fclasses/strtod
+++ b/tests/perf/fclasses/strtod
@@ -17,10 +17,10 @@ proc CheckAtof {nbvalues nbdigits min max} {
        ! [regexp {Strtod\s+([0-9.]+)} $res bidon cpu_Strtod] } {
     puts "Error: cannot interpret results of test command!"
   } else {
-    if { $cpu_atof < 2 * $cpu_Atof } {
+    if { $cpu_atof < 1.5 * $cpu_Atof } {
       puts "Error: Atof() is expected to be at least 2 times better than atof()!"
     }
-    if { $cpu_strtod < 2 * $cpu_Strtod } {
+    if { $cpu_strtod < 1.5 * $cpu_Strtod } {
       puts "Error: Strtod() is expected to be at least 2 times better than strtod()!"
     }
   }