73375359 |
1 | puts "=======" |
2 | puts "OCC28892" |
3 | puts "=======" |
4 | puts "" |
5 | ################################################## |
6 | # BOPAlgo_PaveFiller returns status "error: 11" in draw or raises exception in app on the given shapes set |
7 | ################################################## |
8 | |
9 | binrestore [locate_data_file bug28892_shape.bin] a |
10 | binrestore [locate_data_file bug28892_tools.bin] b |
11 | |
12 | bclearobjects |
13 | bcleartools |
14 | baddobjects a |
15 | explode b |
16 | baddtools b_1 b_6 b_12 |
17 | bfillds |
18 | bbuild result |
19 | |
20 | # just check that the operation did not raise an exception and produced any result |
21 | checkshape result |
22 | |
23 | if {![regexp "OK" [bopcheck result]]} { |
24 | puts "Error: result is self-interfered" |
25 | } |
26 | |
27 | # checkview -display result -2d -path ${imagedir}/${test_image}.png |