tests/bugs/fclasses/bug63

   1 if {[array get env os_type] != "" } {
   2     set os $env(os_type)
   3 }
   4 if { [string compare $os "windows"] == 0 } {
   5     puts "TODO OCC23626 ALL: Tcl Exception"
   6     puts "TODO OCC23626 ALL: TEST INCOMPLETE"
   7 }
   8
   9 puts "================"
  10 puts "OCC63"
  11 puts "================"
  12 puts ""
  13
  14 restore [locate_data_file box__simplifiée.brep] result
  15 checkshape result
  16
  17 set 2dviewer 0
  18
  19