tests/mkface/begin

   1
   2 # To prevent loops limit to 10 minutes
   3 cpulimit 600
   4
   5 if { [array get Draw_Groups "TOPOLOGY Feature commands"] == "" } {
   6         pload TOPTEST
   7 }
   8
   9 if { [array get Draw_Groups "Shape Healing"] == "" } {
  10         pload XSDRAW
  11 }
  12
  13 if { [info exists imagedir] == 0 } {
  14    set imagedir .
  15 }
  16
  17 if { [info exists test_image ] == 0 } {
  18    set test_image photo
  19 }