5 #######################################################################
6 # OCC fails to work with offset surfaces with singularities
7 #######################################################################
13 restore [locate_data_file bug23943_a.brep] s
18 regexp {EDGE +: +([-0-9.+eE]+)} [numshapes s] full EDGE_num_s
20 regexp {EDGE +: +([-0-9.+eE]+)} [numshapes result] full EDGE_num_result
22 if {${EDGE_num_result} != ${EDGE_num_s} || ${EDGE_num_result} == 0} {
23 puts "Faulty ${BugNumber}"
25 puts "OK ${BugNumber}"