mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
7e785937b3
Progress indication mechanism is refactored to support incrementing progress within multithreaded algorithms. The class Message_ProgressIndicator is only an interface to the user application. It accumulates the progress provided by progress scopes. The counter is protected by mutex for thread-safety. The new class Message_ProgressScope replacing Message_ProgressSentry should be used to advance the progress. The scopes are nested to each other to reflect the nested nature of operations. The new class Message_ProgressRange should be used to pass the progress to sub-scopes. All OCCT algorithms involving progress indication have been updated to new API. Improvements in Draw_ProgressIndicator: - Separate console mode has been added in order to make possible to put the progress into std::cout instead or in addition to the draw interpreter, instead of trigger option "-tclOutput". - Treatment of Ctrl-Break signal has been added. Now any operation can be aborted by Ctrl-C or Ctrl-Break keystroke. Added new test case 'perf fclasses progr_par' for testing of parallel work of the progress.
44 lines
846 B
Plaintext
44 lines
846 B
Plaintext
#INTERFACE CAF
|
|
# Message_ProgressIndicator
|
|
#
|
|
# Testing attribute: TDocStd_Application
|
|
#
|
|
# Testing command: Save
|
|
#
|
|
|
|
puts "caf009-C2"
|
|
|
|
set xDoc [CreateXmlDoc]
|
|
|
|
# Open document
|
|
if {${xDoc} == "" } {
|
|
puts "Save command for binary files: Error, cannot open file"
|
|
return
|
|
}
|
|
Open ${xDoc} Doc
|
|
|
|
# Fill the document by another box
|
|
box b 1 1 1
|
|
SetShape Doc 0:2 b
|
|
|
|
# Configurate XProgress
|
|
XProgress +t
|
|
|
|
# Save
|
|
set output [Save Doc]
|
|
|
|
# Close the document
|
|
Close Doc
|
|
|
|
# Test data
|
|
set ctr { "0%" "Writing sub-tree" "Writing shape section" "Polygons On Triangulation"
|
|
"3D Polygons" "Locations" "Writing" "Geometry" "2D Curves"
|
|
"Triangulations" "3D Curves" "Surfaces" "Shapes" "100%" }
|
|
|
|
foreach data ${ctr} {
|
|
if ![regexp $data $output] {
|
|
puts "Error: Save command for xml files: Mismatch data on '$data'"
|
|
break
|
|
}
|
|
}
|