0026424: Visualization, TKOpenGl - fix text rendering in core profile
[occt.git] / tests / bugs / vis / bug26424
1 puts "========"
2 puts "OCC26424"
3 puts "========"
4 puts ""
5 ################################################################
6 # Text is not rendered within core profile on Windows platform
7 ################################################################
8
9 vcaps -core
10 vinit View1
11 vclear
12 vaxo
13 vzbufftrihedron
14
15 if { [array get env os_type] != "" } {
16    set os $env(os_type)
17 }
18 if { [string compare $os "windows"] != 0 } {
19   # Linux platform
20   set ok_color "GRAY85"
21 } else {
22   # Windows platform
23   set ok_color "GRAY52"
24 }
25
26 set bug_info [vreadpixel 71 350 rgb name]
27 if {$bug_info != $ok_color} {
28   puts "ERROR: OCC26424 is reproduced. Trihedron does non have text labels."
29 }
30
31 set only_screen 1