f1aa2b62 |
1 | |
2 | puts "========================" |
3 | puts "OCC618" |
4 | puts "========================" |
5 | puts "" |
6 | ############################ |
7 | ## Exception during bop |
8 | ############################ |
9 | |
10 | restore [locate_data_file OCC618a.brep] a |
352ffd73 |
11 | checkshape a |
f1aa2b62 |
12 | restore [locate_data_file OCC618b.brep] b |
352ffd73 |
13 | checkshape b |
f1aa2b62 |
14 | |
15 | if [catch {bop a b} catch_result] { |
16 | puts "Faulty OCC618 : BOP operation was made wrongly" |
17 | } else { |
18 | puts "OCC618 OK: BOP operation works OK" |
19 | } |
20 | |
5747059b |
21 | checkview -display result -2d -path ${imagedir}/${test_image}.png |