0026914: [Regression 7.0alpha] Hang in surface approximation
[occt.git] / tests / bugs / modalg_6 / bug26914
diff --git a/tests/bugs/modalg_6/bug26914 b/tests/bugs/modalg_6/bug26914
new file mode 100644 (file)
index 0000000..721abfc
--- /dev/null
@@ -0,0 +1,25 @@
+puts "========"
+puts "OCC26914"
+puts "========"
+puts ""
+#################################
+# Hang in surface approximation
+#################################
+
+set max_time 2
+
+restore [locate_data_file OCC26914-a_2773_draw.draw] s
+
+dchrono cr reset
+dchrono cr start
+approxsurf rs s 5e-5 0 0 15 15 100 0
+
+dchrono cr stop
+
+set chrono_info [dchrono cr show]
+regexp {CPU user time: ([-0-9.+eE]+) seconds} $chrono_info full CPU_time
+if { $CPU_time > ${max_time} } {
+  puts "Elapsed time of surface approximation is more than ${max_time} seconds - Error"
+} else {
+  puts "Elapsed time of surface approximation is less than ${max_time} seconds - OK"
+}