tests/bugs/vis/bug166

   1 puts "================="
   2 puts "OCC166"
   3 puts "================="
   4 puts ""
   5
   6 vinit
   7
   8 if [ catch { OCC166 } res ] then {
   9    puts "OCC166: Error"
  10 } else {
  11    puts "OCC166: OK"
  12 }
  13
  14 set only_screen 1