61c421bf |
1 | puts "========" |
2 | puts "OCC6412" |
3 | puts "========" |
4 | puts "" |
5 | #################################################### |
6 | ## Regression in visualization |
7 | #################################################### |
8 | |
9 | set BugNumber OCC6412 |
10 | |
11 | restore [locate_data_file OCC6412.brep] result |
12 | |
13 | tclean result |
14 | vinit |
15 | vdisplay result |
16 | vsetdispmode result 1 |
17 | |
18 | isos result 0 |
19 | triangles result |
20 | |
21 | set tri 0 |
22 | set nod 0 |
23 | set tri_info [trinfo result] |
24 | regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri |
25 | regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod |
26 | if { ${tri} == 0 && ${nod} == 0 } { |
27 | puts "Faulty ${BugNumber}" |
28 | } else { |
29 | puts "OK ${BugNumber}" |
30 | } |
31 | |
5747059b |
32 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |