[occt.git] / tests / bugs / vis / bug22368

puts "========================"
puts "OCC22368"
puts "========================"
puts ""
#######################################################################
# AIS_Trihedron's highlight presentation isn't updated on trihedron relocation
#######################################################################

set BugNumber OCC22368

vclear
vinit View1
vtrihedron trihedron
OCC74_set trihedron 3

set x1 200
set x2 220
set x3 210

set y 190

vselect ${x3} ${y}

vsetlocation trihedron 100 100 100

set status 0
for {set i ${x1} } {$i <= ${x2} } {incr i} {
    checkcolor ${i} ${y} 0 0 0
}

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
7faaccfd	1	puts "========================"
	2	puts "OCC22368"
	3	puts "========================"
	4	puts ""
	5	#######################################################################
	6	# AIS_Trihedron's highlight presentation isn't updated on trihedron relocation
	7	#######################################################################
	8
	9	set BugNumber OCC22368
	10
458e3c0d	11	vclear
458e3c0d	12	vinit View1
7faaccfd	13	vtrihedron trihedron
	14	OCC74_set trihedron 3
	15
	16	set x1 200
	17	set x2 220
	18	set x3 210
	19
	20	set y 190
	21
	22	vselect ${x3} ${y}
	23
458e3c0d	24	vsetlocation trihedron 100 100 100
7faaccfd	25
	26	set status 0
	27	for {set i ${x1} } {$i <= ${x2} } {incr i} {
	28	checkcolor ${i} ${y} 0 0 0
	29	}
	30
5747059b	31	checkview -screenshot -3d -path ${imagedir}/${test_image}.png