6 #######################################################################
7 # Test for conversion of sensitives by AIS_InteractiveContext::Update
8 #######################################################################
10 set aV "Driver1/Viewer1/View1"
11 vinit name=$aV l=32 t=32 w=400 h=400
23 checkcolor 395 200 0 1 1
26 puts "Error : Selection of AIS_Plane does not work initially!"
29 puts "Testing of plane sensitivity update:"
31 vchangeplane pl1 x=-150 y=150 z=0 sx=10 sy=10
34 checkcolor 199 23 0 1 0
37 puts "Error : Sensitive entity of AIS_Plane is not updated!"
41 checkcolor 199 23 0 1 1
44 puts "Error : Sensitive entity of AIS_Plane is incorrect after update!"