tests/heal/end

   1 clear
   2 smallview
   3 if { [isdraw result] } {
   4    donly result
   5 } else {
   6    puts "Error : the resulting shape is not done."
   7 }
   8 fit
   9 xwd $imagedir/${test_image}.png
  10 puts "TEST COMPLETED"