1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-09 18:50:54 +03:00
occt/tests/bugs/mesh/bug24938
apn f05f2e3430 0024938: BRepMesh_IncrementalMesh hangs
Added test case bugs/mesh/bug24938

Small corrections in test case bugs/mesh/bug24938
2014-12-11 17:22:43 +03:00

40 lines
883 B
Plaintext

puts "TODO OCC24938 ALL: Error: shape contains 0 triangles"
puts "TODO OCC24938 ALL: Error: shape contains 0 nodes"
puts "=========="
puts "OCC24938"
puts "=========="
puts ""
########################################
# BRepMesh_IncrementalMesh hangs
########################################
# to prevent loops limit to 5 minutes
cpulimit 300
restore [locate_data_file bug24938_27773.brep] result
tclean result
incmesh result 1.5 -relative
set trinfo_s [trinfo result]
regexp {([0-9]+) triangles} ${trinfo_s} str nbtri_s
regexp {([0-9]+) nodes} ${trinfo_s} str nbnod_s
if { ${nbtri_s} == 0 } {
puts "Error: shape contains 0 triangles"
} else {
puts "OK: shape contains ${nbtri_s} triangles"
}
if { ${nbnod_s} == 0 } {
puts "Error: shape contains 0 nodes"
} else {
puts "OK: shape contains ${nbnod_s} nodes"
}
vinit
vsetdispmode 1
vdisplay result
vfit
set only_screen 1