tests/sewing/begin

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