[occt.git] / tests / perf / mesh / bug25113_1

puts "========="
puts "0025113: Progress indicator in mesh"
puts "========="
puts ""

restore [locate_data_file bug21134_r.brep] a
tclean a
XProgress +t
set output [incmesh a 0.005]

set ctr { "Perform incmesh" "Mesh Perform"
          "Face Discret" "100%"
          "Create triangles on new vertices" }

foreach data ${ctr} {
    if ![regexp $data $output] {
       puts "Error: Non parallel version incmesh command: Mismatch data on '$data'"
       break; 
    }
}
Commit	Line	Data
ce97cd97	1	puts "========="
	2	puts "0025113: Progress indicator in mesh"
	3	puts "========="
	4	puts ""
	5
	6	restore [locate_data_file bug21134_r.brep] a
	7	tclean a
	8	XProgress +t
	9	set output [incmesh a 0.005]
	10
	11	set ctr { "Perform incmesh" "Mesh Perform"
	12	"Face Discret" "100%"
	13	"Create triangles on new vertices" }
	14
	15	foreach data ${ctr} {
	16	if ![regexp $data $output] {
	17	puts "Error: Non parallel version incmesh command: Mismatch data on '$data'"
	18	break;
	19	}
	20	}
	21