2 puts "0030949: Foundation Classes - Dump improvement for OCCT classes"
12 set dump_aligned_off [vaspects -defaults -dumpJson -dumpCompact on]
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."
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
23 set dump_aligned_off_deep [vaspects -defaults -dumpJson -dumpCompact on -dumpDepth 2]
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"
30 puts "Aligned Dump of vaspects:"
31 set dump_aligned_on [vaspects -defaults -dumpJson]
33 puts "Aligned Dump of vaspects (deep = 2):"
34 set dump_aligned_on_deep [vaspects -defaults -dumpJson -dumpCompact off -dumpDepth 2]