1 puts "TODO CR29596 ALL: Warning: Intersection of pair of shapes has failed"
2 puts "TODO OCC21134 ALL: Error: checkshape command does not return faulty shapes"
8 ######################################################
9 # checkshape command does not return faulty shapes.
10 ######################################################
12 restore [locate_data_file bug21134_r.brep] res
16 set Log [bopcheck res]
17 if {[regexp "This shape seems to be OK" ${Log}] != 1} {
18 puts "Error: checkshape command does not return faulty shapes."