0025748: Parallel version of progress indicator
[occt.git] / tests / perf / fclasses / progr_par
diff --git a/tests/perf/fclasses/progr_par b/tests/perf/fclasses/progr_par
new file mode 100644 (file)
index 0000000..a5ca5b0
--- /dev/null
@@ -0,0 +1,13 @@
+puts "# ========"
+puts "# 0025748: Parallel version of progress indicator"
+puts "# ========"
+puts ""
+
+pload QAcommands
+
+XProgress +t
+
+set out [OCC25748 -niter 10000 -matsize 100 -parallel -progr]
+if {[llength [split $out \n]] != 103} {
+  puts "Error: unexpected number of lines in the output, must be 103"
+}