0027691: Remove dchrono from all test cases and move its to perf group

[occt.git] / tests / bugs / modalg_5 / bug24751_1

diff --git a/tests/bugs/modalg_5/bug24751_1 b/tests/bugs/modalg_5/bug24751_1
deleted file mode 100644 (file)
index 74575b0..0000000
--- a/tests/bugs/modalg_5/bug24751_1
+++ /dev/null
@@ -1,59 +0,0 @@
-puts "========="
-puts "OCC24751"
-puts "========="
-puts ""
-###########################################################
-# Performance improvements in the Edge/Edge intersection algorithm
-###########################################################
-
-pload QAcommands
-
-if { [regexp {Debug mode} [dversion]] } {
-  if { [regexp {Windows} [dversion]] } {
-    set max_time 250
-  } else {
-    set max_time 290
-  }
-} else {
-  if { [regexp {Windows} [dversion]] } {
-    set max_time 65
-  } else {
-    set max_time 100
-  }
-}
-
-if { [regexp {Mac OS X} [dversion]] } {
-  set max_time 320
-}
-
-dchrono h reset
-dchrono h start
-
-restore [locate_data_file bug24696_cx_e1200_nurbs.brep] cx
-
-###------------------####
-trotate cx 0 0 0 0 0 1 45
-###------------------####
-
-bclearobjects
-bcleartools
-
-set edges [explode cx e]
-set nbe [llength $edges]
-for {set i 1} {$i <= $nbe} {incr i} {baddobjects cx_$i}
-bfillds
-bbuild result
-
-dchrono h stop
-set q [dchrono h show]
-
-regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full z
-puts "$z"
-
-if { $z > ${max_time} } {                                         
-    puts "Elapsed time is more than ${max_time} seconds - Faulty"
-} else {
-    puts "Elapsed time is less than ${max_time} seconds - OK"
-}
-
-checkview -display result -2d -path ${imagedir}/${test_image}.png