9753e6de |
1 | # Errors are different in Debug and Release mode |
2 | puts "TODO ?#23910 ALL: Error : The square of result shape is" |
3 | puts "TODO ?#23910 ALL: Faulty shapes in variables faulty_1 to faulty_" |
4 | puts "TODO ?#23910 ALL: Faulty OCC827" |
5 | |
6 | # Debug on Windows |
7 | puts "TODO ?#23910 ALL: Standard_Failure : Exception in REV Function" |
8 | puts "TODO ?#23910 ALL: result is not a topological shape!!!" |
9 | puts "TODO ?#23910 ALL: TEST INCOMPLETE" |
352ffd73 |
10 | |
f1aa2b62 |
11 | pload QAcommands |
12 | |
352ffd73 |
13 | puts "========" |
f1aa2b62 |
14 | puts "OCC827" |
352ffd73 |
15 | puts "========" |
f1aa2b62 |
16 | puts "" |
352ffd73 |
17 | ################################### |
f1aa2b62 |
18 | ## BRepAlgoAPI_Fuse fails on cylinder and torus |
352ffd73 |
19 | ################################### |
20 | ## (old topology) |
21 | ##################################### |
f1aa2b62 |
22 | |
23 | # |
24 | # a1 - Cylinder |
25 | # a2 - Torus1 |
26 | # a3 - Torus1 |
27 | # res1 - Fuse(Torus1 & Cylinder) |
28 | # res2 - Fuse(Torus2 & res1) |
29 | # |
30 | |
352ffd73 |
31 | if { [ catch { set info_result [OCC827 a1 a2 a3 res1 res2 0] } ] } { |
32 | puts "Faulty OCC827" |
f1aa2b62 |
33 | } else { |
352ffd73 |
34 | if { [regexp {FAILED} $info_result] } { |
35 | puts "Faulty OCC827" |
36 | } |
37 | checkshape a1 |
38 | checkshape a2 |
39 | checkshape a3 |
40 | checkshape res1 |
41 | |
42 | set ExplodeList [explode res1] |
f1aa2b62 |
43 | if {[llength ${ExplodeList}] < 1} { |
352ffd73 |
44 | puts "Faulty OCC827" |
f1aa2b62 |
45 | } |
f1aa2b62 |
46 | |
352ffd73 |
47 | set ExplodeList [explode res2] |
f1aa2b62 |
48 | if {[llength ${ExplodeList}] < 1} { |
352ffd73 |
49 | puts "Faulty OCC827" |
f1aa2b62 |
50 | } |
352ffd73 |
51 | renamevar res2 result |
f1aa2b62 |
52 | } |
352ffd73 |
53 | set square 0 |
54 | set 2dviewer 1 |