tests/bugs/moddata_2/bug542

   1
   2 puts "========"
   3 puts "OCC542"
   4 puts "========"
   5 puts ""
   6 ################################
   7 ## Wrong projection of the circle on the sphere
   8 ################################
   9
  10 restore [locate_data_file OCC542_C3D.draw] c3d
  11 restore [locate_data_file OCC542_S.draw] s
  12
  13 if { [catch {project result c3d s } catch_result] } {
  14     puts "OCC542 Faulty"
  15 } else {
  16     # create dump of resulting curve
  17     set dump [dump result]
  18     # read dump of old curve
  19     set olddump [read [open [locate_data_file OCC542_DUMP]]]
  20     # if the the dumps is equal this bug is still exist
  21     if { $dump == $olddump } {
  22         puts "OCC542 Faulty"
  23     } else {
  24         puts "OCC542 WARNING: Dumps of old and new curve are different, probably bug is still exist"
  25     }
  26 }
  27
  28 checkview -display result -2d -path ${imagedir}/${test_image}.png