33ba8565 |
1 | puts "========" |
2 | puts "OCC28786" |
3 | puts "========" |
4 | puts "" |
5 | ######################################## |
6 | # Refactoring of the Warning/Error reporting system of Boolean Operations Algorithm |
7 | ######################################## |
8 | |
9 | plane p1 0 0 0 1 0 0 |
10 | mkface f1 p1 -10 10 -10 10 |
11 | plane p2 0 0 0 1 0 1 |
12 | mkface f2 p2 -10 10 -10 10 |
13 | compound f1 f2 a |
14 | |
15 | line l 0 0 0 0 1 0 |
16 | mkedge b l -11 11 |
17 | |
18 | bclearobjects |
19 | bcleartools |
20 | baddobjects a |
21 | baddtools b |
22 | |
23 | if {![regexp "Warning" [bfillds]]} { |
24 | puts "Error: WarningStatus has not been set" |
25 | } |
26 | |
27 | bbuild result |
28 | checkshape result |
29 | checknbshapes result -face 4 -edge 15 |