tests/xcaf/begin

   1 # in tests expression "set AddToDocument ASSEMBLY_C_L" means creating assembly and initializing colors and layers
   2 # and expression "set AddToDocument COLORS_LAYERS" means initializing colors and layers
   3 #
   4 if { [array get Draw_Groups "TOPOLOGY Feature commands"] == "" } {
   5     pload DCAF
   6     pload TOPTEST
   7     pload XDE
   8 }
   9
  10 cpulimit 1000
  11
  12 set ErrorCode 0
  13 ##############
  14 ### ErrorCode means :
  15 ### 0 - Success
  16 ### 1 - Warning
  17 ### 2 - Error
  18 ###############
  19
  20 #if {[string compare [datadir] "."] == 0} {
  21 #  datadir [file dirname [info script]]/data
  22 #}
  23
  24 if { [info exists imagedir] == 0 } {
  25    set imagedir .
  26 }
  27 if { [info exists test_image ] == 0 } {
  28    set test_image photo
  29 }
  30
  31 #set WorkDirectory "$env(TmpDir)"
  32 set WorkDirectory $imagedir
  33
  34 if {![file exists $WorkDirectory]} {
  35     catch {[file mkdir $WorkDirectory]}
  36 } else {
  37     if {![file isdirectory $WorkDirectory]} {
  38         puts "The assigned work directory $WorkDirectory is not directory! Exit ..."
  39         exit
  40     }
  41 }