0031999: Tests - request Core Profile on macOS for Ray-Tracing tests
[occt.git] / tests / bugs / vis / bug26960
1 puts "========"
2 puts "0026960: Visualization, TKOpenGl - update transformation of dynamically highlighted presentation"
3 puts "========"
4 puts ""
5
6 pload VISUALIZATION MODELING
7
8 box b 1 2 3
9
10 vclear
11 vinit View1
12
13 vdisplay -dispmode 1 -highmode 1 b
14 vfit
15 vselmode 4 1
16 vmoveto 250 250
17 if {[vreadpixel 350 140 rgb name] != "BLACK"} { puts "ERROR: wrong inital location" }
18 vsetlocation b 0.5 0 0
19 if {[vreadpixel 350 140 rgb name] != "CYAN2"} { puts "ERROR: the transformation was not applied to highlight structure" }
20
21 vdump ${imagedir}/${test_image}.png