319e4241 |
1 | # Original bug : 23384 |
2 | # Date : 16 Aug 2012 |
3 | |
4 | if {[array get env os_type] != ""} { |
5 | set os $env(os_type) |
6 | } |
34dd4990 |
7 | XOpen [locate_data_file bug23384-doc_subshapes.dxc] doc |
319e4241 |
8 | set info1 [XStat doc] |
9 | regexp {level N 0 +: +([-0-9.+eE]+)} $info1 full l0 |
10 | regexp {level N 1 +: +([-0-9.+eE]+)} $info1 full l1 |
11 | regexp {level N 2 +: +([-0-9.+eE]+)} $info1 full l2 |
12 | regexp {level N 3 +: +([-0-9.+eE]+)} $info1 full l3 |
13 | regexp {level N 4 +: +([-0-9.+eE]+)} $info1 full l4 |
14 | regexp {level N 5 +: +([-0-9.+eE]+)} $info1 full l5 |
15 | regexp {level N 6 +: +([-0-9.+eE]+)} $info1 full l6 |
16 | regexp {Total number of labels for shapes in the document += +([-0-9.+eE]+)} $info1 full nb |
17 | regexp {Number of labels with name += +([-0-9.+eE]+)} $info1 full nbname |
18 | |
19 | param write.stepcaf.subshapes.name 1 |
20 | if { [string compare $os "windows"] == 0 } { |
21 | WriteStep doc C:/temp/doc_subshapes.stp |
22 | } else { |
23 | WriteStep doc /tmp/doc_subshapes.stp |
24 | } |
25 | param read.stepcaf.subshapes.name 1 |
26 | if { [string compare $os "windows"] == 0 } { |
27 | ReadStep after_doc C:/temp/doc_subshapes.stp |
28 | } else { |
29 | ReadStep after_doc /tmp/doc_subshapes.stp |
30 | } |
31 | |
32 | set info2 [XStat after_doc] |
33 | regexp {level N 0 +: +([-0-9.+eE]+)} $info2 full l0_1 |
34 | regexp {level N 1 +: +([-0-9.+eE]+)} $info2 full l1_1 |
35 | regexp {level N 2 +: +([-0-9.+eE]+)} $info2 full l2_1 |
36 | regexp {level N 3 +: +([-0-9.+eE]+)} $info2 full l3_1 |
37 | regexp {level N 4 +: +([-0-9.+eE]+)} $info2 full l4_1 |
38 | regexp {level N 5 +: +([-0-9.+eE]+)} $info2 full l5_1 |
39 | regexp {level N 6 +: +([-0-9.+eE]+)} $info2 full l6_1 |
40 | regexp {Total number of labels for shapes in the document += +([-0-9.+eE]+)} $info2 full nb_1 |
41 | regexp {Number of labels with name += +([-0-9.+eE]+)} $info2 full nbname_1 |
42 | |
43 | if { ${l0} != ${l0_1} || |
44 | ${l1} != ${l1_1} || |
45 | ${l2} != ${l2_1} || |
46 | ${l3} != ${l3_1} || |
47 | ${l4} != ${l4_1} || |
48 | ${l5} != ${l5_1} || |
49 | ${l6} != ${l6_1} || |
50 | ${nb} != ${nb_1} || |
51 | ${nbname} != ${nbname_1} } { |
52 | puts "Error : Document is read/written wrong!" |
319e4241 |
53 | } |
54 | |
55 | |
56 | |
57 | |
58 | |
59 | |
60 | |
61 | |
62 | |
63 | |
64 | |
65 | |