From e32045fd7135e46f7f6a7a4d181f590354a77ab5 Mon Sep 17 00:00:00 2001
From: emv <emv@opencascade.com>
Date: Thu, 12 Feb 2015 12:02:30 +0300
Subject: [PATCH] 0025801: Some of the commands in BOPTest packages show the
 execution time without -t key

Unnecessary output of the execution time has been removed in the following commands:
 - bopcheck
 - bfillds
 - bbuild
 - bbop

Test case for issue CR25801
---
 src/BOPTest/BOPTest_CheckCommands.cxx     |  1 -
 src/BOPTest/BOPTest_PartitionCommands.cxx |  3 ---
 tests/bugs/modalg_5/bug25801              | 22 ++++++++++++++++++++++
 3 files changed, 22 insertions(+), 4 deletions(-)
 create mode 100755 tests/bugs/modalg_5/bug25801

diff --git a/src/BOPTest/BOPTest_CheckCommands.cxx b/src/BOPTest/BOPTest_CheckCommands.cxx
index 2c38c9d485..72c7e423e3 100644
--- a/src/BOPTest/BOPTest_CheckCommands.cxx
+++ b/src/BOPTest/BOPTest_CheckCommands.cxx
@@ -243,7 +243,6 @@ Standard_Integer bopcheck (Draw_Interpretor& di,
   aChecker.Perform();
   //
   aTimer.Stop();
-  aTimer.Show();
   //
   iErr=aChecker.ErrorStatus();
   //
diff --git a/src/BOPTest/BOPTest_PartitionCommands.cxx b/src/BOPTest/BOPTest_PartitionCommands.cxx
index 29c253c14f..82bf7f7ccb 100644
--- a/src/BOPTest/BOPTest_PartitionCommands.cxx
+++ b/src/BOPTest/BOPTest_PartitionCommands.cxx
@@ -126,7 +126,6 @@ Standard_Integer bfillds(Draw_Interpretor& di,
   }
   //
   aTimer.Stop();
-  aTimer.Show();
   //
   if (bShowTime)
   {
@@ -202,7 +201,6 @@ Standard_Integer bbuild(Draw_Interpretor& di,
   }
   //
   aTimer.Stop();
-  aTimer.Show();
   //
   if (bShowTime)
   {
@@ -314,7 +312,6 @@ Standard_Integer bbop(Draw_Interpretor& di,
   }
   //
   aTimer.Stop();
-  aTimer.Show();
   //
   if (bShowTime) {
     Sprintf(buf, "  Tps: %7.2lf\n", aTimer.ElapsedTime());
diff --git a/tests/bugs/modalg_5/bug25801 b/tests/bugs/modalg_5/bug25801
new file mode 100755
index 0000000000..856201c731
--- /dev/null
+++ b/tests/bugs/modalg_5/bug25801
@@ -0,0 +1,22 @@
+puts "========="
+puts "CR25801"
+puts "========="
+puts ""
+###############################
+## Some of the commands in BOPTest packages show the execution time without -t key
+###############################
+
+box b1 10 10 10
+
+dlog reset
+dlog on
+bopcheck b1
+set Log1 [dlog get]
+
+puts "${Log1}"
+
+if { [regexp {Elapsed time} ${Log1}] } {
+   puts "Error: bopcheck show the execution time without -t key"
+} else {
+   puts "OK: bopcheck does not show the execution time without -t key"
+}
-- 
2.39.5