0029528: Visualization, TKOpenGl - allow defining sRGB textures
[occt.git] / tests / bugs / vis / bug30949
1 puts "============="
2 puts "0030949: Foundation Classes - Dump improvement for OCCT classes"
3 puts "============="
4
5 pload VISUALIZATION
6 vinit View1
7
8 set pred   0.088428
9 set pgreen 0.041081
10 set pblue  0.00209
11
12 set dump_aligned_off [vaspects -defaults -dumpJson -dumpCompact on]
13
14 if {![regexp {"RGB": \[+([-0-9.+eE]+)\, +([-0-9.+eE]+)\, +([-0-9.+eE]+)\]} $dump_aligned_off full cred cgreen cblue]} {
15   puts "Error in Dump. Wrong format of output."
16 }
17
18 checkreal "Cred" $cred $pred 1.0e-7 0.0
19 checkreal "Cgreen" $cgreen $pgreen 1.0e-7 0.0
20 checkreal "Cblue" $cblue $pblue 1.0e-7 0.0
21
22
23 set dump_aligned_off_deep [vaspects -defaults -dumpJson -dumpCompact on -dumpDepth 2]
24
25 if {[regexp {\[+([-0-9.+eE]+)\, +([-0-9.+eE]+)\, +([-0-9.+eE]+)\]} dump_aligned_off_deep full cred cgreen cblue]} {
26   puts "Error in Dump. Wrong deep of output"
27 }
28
29
30 puts "Aligned Dump of vaspects:"
31 set dump_aligned_on [vaspects -defaults -dumpJson]
32
33 puts "Aligned Dump of vaspects (deep = 2):"
34 set dump_aligned_on_deep [vaspects -defaults -dumpJson -dumpCompact off -dumpDepth 2]