f18ccc8c |
1 | puts "==========" |
2 | puts "OCC24822" |
3 | puts "==========" |
4 | puts "" |
5 | ################################################### |
6 | # Solve selection fails after copying |
7 | ################################################### |
8 | |
9 | restore [locate_data_file bug24822_face.brep] f |
10 | explode f w |
11 | |
12 | NewDocument D XmlOcaf |
13 | ImportShape D 0:1 f |
14 | SelectShape D 0:2 f_1 f |
15 | SolveSelection D 0:2 |
16 | |
17 | CopyLabel D 0:2 0:3 |
18 | |
19 | if [catch { SolveSelection D 0:3 } ] { |
20 | puts "Error: Solve selection fails after copying" |
21 | } else { |
22 | puts "OK: Solve selection is good after copying" |
23 | } |