tests/bugs/mesh/bug23631

   1 puts "========"
   2 puts "OCC23631"
   3 puts "========"
   4 puts ""
   5 ###########################################
   6 ## Infinite memory consumption in BRepMesh
   7 ###########################################
   8
   9 set BugNumber 23631
  10
  11 restore [locate_data_file OCC396_f2903.brep] result
  12
  13 incmesh result 0.01
  14 triangles result
  15
  16 set tri 0
  17 set nod 0
  18
  19 set good_tri 38
  20 set good_nod 40
  21
  22 set tri_info [trinfo result]
  23 regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri
  24 regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod
  25
  26 if { ${tri} == ${good_tri} && ${nod} == ${good_nod} } {
  27     puts "Bug ${BugNumber} shading: OK"
  28 } else {
  29     puts "Bug ${BugNumber} shading: Faulty"
  30 }
  31
  32 vinit
  33 vdisplay result
  34 vfit
  35 vsetdispmode 1
  36 set only_screen 1
  37