0029528: Visualization, TKOpenGl - allow defining sRGB textures

[occt.git] / tests / bugs / xde / bug28641

diff --git a/tests/bugs/xde/bug28641 b/tests/bugs/xde/bug28641
index 5627d67..c22e933 100644 (file)
--- a/tests/bugs/xde/bug28641
+++ b/tests/bugs/xde/bug28641
@@ -1,10 +1,7 @@
 puts "========"
-puts "OCC28641"
+puts "0028641: Data Exchange - Support alpha-channel of color"
 puts "========"
 puts ""
-####################################################
-# Data Exchange - Support alpha-channel of color
-####################################################
 
 pload OCAF
 
@@ -14,17 +11,17 @@ box b 1 1 1
 explode b e
 explode b f
 XAddShape D_First b
-XSetColor D_First b_1 1 0 0 s
-XSetColor D_First b_2 1 1 0 0.3 s
-XSetColor D_First b_11 1 1 1 0.2 c
-XSetColor D_First b_10 0 1 1 c
+XSetColor D_First b_1 RED s
+XSetColor D_First b_2 YELLOW 0.3 s
+XSetColor D_First b_11 WHITE 0.2 c
+XSetColor D_First b_10 CYAN c
 XAddColor D_First 0.5 0.5 1 0.1
 
 XShow D_First
 vfit
 vsetdispmode 1
 vdump $::imagedir/${::casename}_first.png
-if { [vreadpixel 300 200 rgb name] != "DARKKHAKI" } { puts "Error: wrong color in 3D Viewer" }
+if { [vreadpixel 300 200 rgb name] != "GRAY63" } { puts "Error: wrong color in 3D Viewer" }
 
 # Write file
 SaveAs D_First ${imagedir}/bug28521.xbf
@@ -68,7 +65,7 @@ if {$res != "CYAN"} {
 #0:1:2:5
 set res [XGetColor D_Second 0:1:2:5]
 regexp {([A-Z0-9]+) \(([0-9.+eE]+)\)} $res full color alpha
-if {$color != "LIGHTSLATEBLUE"} {
+if {$color != "LIGHTSTEELBLUE2"} {
   set isOK 0
 }
 if {[expr abs(0.1 - $alpha)] > $prec} {
@@ -83,6 +80,6 @@ XShow D_Second
 vfit
 vsetdispmode 1
 vdump $::imagedir/${::casename}.png
-if { [vreadpixel 300 200 rgb name] != "DARKKHAKI" } { puts "Error: wrong color in 3D Viewer" }
+if { [vreadpixel 300 200 rgb name] != "GRAY63" } { puts "Error: wrong color in 3D Viewer" }
 
 Close D_Second