a0cbe3ffc80bcbac43c3b1b8e177307bc2c179ba
[occt.git] / tests / bugs / caf / bug2269
1 puts "REQUIRED All: XmlDriver warning: failure reading attribute TDataStd_RealArray"
2
3 puts "================"
4 puts "OCC2269"
5 puts "================"
6 puts ""
7 #######################################################################################
8 # XML persistance should be more robust
9 #######################################################################################
10
11 # Tested file is contains 3 labels with TDataStd_RealArray attributes
12 # 0:2   label has good TDataStd_RealArray attribute
13 # 0:22  label has bad  TDataStd_RealArray attribute
14 # 0:222 label has good TDataStd_RealArray attribute
15
16 #######################################################################################
17
18 #set ScriptDir $XmlDir
19 #source ${ScriptDir}/begin
20 #source ${ScriptDir}/002/begin
21
22 #set aTestName "OCC2269"
23 #set WorkDirectory ${filedir}
24 #set aFile $WorkDirectory/${aTestName}.${FileSuffix}
25 #catch {Close D}
26
27 set IsGood 1
28 Open [locate_data_file OCC2269.xml] DD
29
30 if [catch {XDumpDF DD } result] {
31    puts "Error during dump ${aFile} file"
32    set IsGood 0
33 }
34 if [catch {CheckLabel DD 0:2} result] {
35    puts "Error during search 0:2 label in ${aFile} file"
36    set IsGood 0
37 }
38 if [catch {CheckLabel DD 0:22} result] {
39    puts "Error during search 0:22 label in ${aFile} file"
40    set IsGood 0
41 }
42 if [catch {CheckLabel DD 0:222} result] {
43    puts "Error during search 0:222 label in ${aFile} file"
44    set IsGood 0
45 }
46
47 Close DD
48
49 if { ${IsGood} == 0} {
50   puts "Faulty OCC2269"
51 } else {
52   puts "OK OCC2269"
53 }