tests/bugs/moddata_1/bug12888

   1 puts "============"
   2 puts "OCC12888"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Wrong result of projection curve on surface
   7 #######################################################################
   8
   9 set BugNumber OCC12888
  10
  11 restore [locate_data_file OCC12888_s1.draw] s1
  12 restore [locate_data_file OCC12888_c2.draw] c2
  13
  14 set BugStatus 0
  15 if [catch { project result c2 s1 } ] {
  16     set BugStatus 1
  17 }
  18
  19 # Resume
  20 puts ""
  21 if { ${BugStatus} != 0 } {
  22     puts "Faulty ${BugNumber}"
  23 } else {
  24     puts "OK ${BugNumber}"
  25 }
  26
  27 checkview -display result -2d -path ${imagedir}/${test_image}.png
  28
  29