tests/bugs/fclasses/bug181_2

   1 puts "========"
   2 puts "OCC181"
   3 puts "OCC701"
   4 puts "========"
   5 ######################################################
   6 # Resource_Manager class doen't return status of saving resources in a file.
   7 ######################################################
   8 # Add method BuildPath to OSD_Directory
   9 ######################################################
  10
  11 # Clear tmp-data
  12 ######################################################################
  13 set tmp ${imagedir}
  14 ######################################################################
  15
  16 pload QAcommands
  17
  18 set log [OCC181 OCC181 ${imagedir} ${tmp}/2/2/3 0]
  19
  20 set list [split ${log}]
  21 set ll [llength ${list}]
  22 set status [lindex ${list} [expr ${ll} - 2] ]
  23
  24 if { ${status} == "TRUE"} then {
  25     puts "OCC181: OK"
  26 } else {
  27     puts "OCC181: Error"
  28 }
  29
  30 if { ! [file exists ${tmp}/2/2/3/OCC181] } {
  31   puts "Error: user resource file is not found!"
  32 }
  33
  34 file delete -force ${tmp}/2