1 set aTestName "caf100-F1"
5 set driverGuid "5b35ca00-5b78-11d1-8940-080009dc3333"
10 # Set a function attribute
13 SetFunction D ${aCLabel} ${driverGuid} ${failureNb}
16 set aFile ${WorkDirectory}/${aTestName}.${FileSuffix}
20 # Restore the document
24 # Get a variable from the label
25 set IsDone [catch {GetFunction DD ${aCLabel} driverGuid2 failureNb2} aResult]
26 if { ${IsDone} != 0 } {
27 puts "Error : Get a value of TFunction_Function attribute from restoring document"
30 if { ${failureNb2} != ${failureNb} } {
31 puts "Error : Get a value of TFunction_Function attribute from restoring document"
34 if { ${driverGuid2} != ${driverGuid} } {
35 puts "Error : Get a value of TFunction_Function attribute from restoring document"