tests/bugs/xde/bug22728

   1 puts "================"
   2 puts "OCC22728"
   3 puts "================"
   4 puts ""
   5 #######################################################################################
   6 # STEP export API does not provide possibility to control output stream
   7 ######################################################################################
   8
   9 set BugNumber OCC22728
  10
  11 box b 10 10 10
  12
  13 cd ${imagedir}
  14
  15 set text [stepwrite a b test.step]
  16
  17 if { [regexp "File test.step written" $text] != 1 } {
  18   puts "Faulty ${BugNumber}"
  19 } else {
  20   puts "OK ${BugNumber}"
  21 }
  22