tests/bugs/moddata_2/bug22746_3

   1 puts "============"
   2 puts "OCC22746"
   3 puts "============"
   4 puts ""
   5 ###########################################################################
   6 # Progress indicator in ShapeHealing
   7 ###########################################################################
   8
   9 set BugNumber OCC22746
  10
  11 set Min_ListLength 11
  12
  13 catch { pload XSDRAW }
  14
  15 restore [locate_data_file OCC22761-TransmissionTestModel5-notfixed.brep] a
  16 vinit
  17 XProgress -t
  18 set List1 [fixshape result a]
  19 puts "----------------------"
  20 XProgress +t
  21 set List2 [fixshape result a]
  22
  23 set status 0
  24
  25 if { ${List1} != ${List2}} {
  26     set status 0
  27 } else {
  28     set status 1
  29 }
  30
  31 if { [ regexp {Progress:} $List2 ] } {
  32     puts "${BugNumber} OK"
  33     set status 0
  34 } else {
  35     puts "${BugNumber} Faulty"
  36     set status 1
  37 }
  38
  39 if { $status != 0 } {
  40     puts  "Faulty $BugNumber"
  41 } else {
  42     puts  "OK $BugNumber"
  43 }
  44
  45 checkview -display result -3d -path ${imagedir}/${test_image}.png
  46 checkprops result -s 7.46496e+06