tests/bugs/moddata_2/bug23172

   1 puts "================"
   2 puts "OCC23172"
   3 puts "================"
   4 puts ""
   5 ######################################
   6 # vexport failed on some Intel GPUs
   7 ######################################
   8
   9 set BugNumber OCC23172
  10
  11 box b 1 2 3
  12 vinit
  13 vdisplay b
  14 vfit
  15
  16 set aFile $imagedir/${test_image}.svg
  17
  18 if { [file exists ${aFile}] } {
  19   file delete ${aFile}
  20 }
  21
  22 vexport $aFile SVG
  23
  24 if { [file exists ${aFile}] } {
  25    puts "Export to SVG file was done"
  26    puts "OK : Export to SVG file was done"
  27 } else {
  28    puts "Faulty : Export to SVG file was not done"
  29 }
  30
  31 set only_screen 1
  32