673693f1 |
1 | puts "================" |
2 | puts "OCC21317" |
3 | puts "================" |
4 | puts "" |
5 | ###################################################################################### |
6 | # Face cannot be fixed by Shape Healing |
7 | ###################################################################################### |
8 | |
9 | set BugNumber OCC21317 |
10 | |
11 | catch {pload XDE} |
12 | |
13 | restore [locate_data_file bug21317_faulty.brep] a |
14 | fixshape result a |
15 | set info [checkshape result] |
16 | |
17 | # Resume |
18 | puts "" |
19 | if { [regexp {This shape seems to be valid} $info] } { |
20 | puts "OK ${BugNumber}" |
21 | } else { |
22 | puts "Faulty ${BugNumber}" |
23 | } |
24 | |
5747059b |
25 | checkview -display result -2d -path ${imagedir}/${test_image}.png |