mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
9753e6deb9
In parallel mode, limit number of jobs in the queue to avoid slowdown occurring with long queues Obsolete DRAW tools removed Improvement of processing of test log: - log is collected as list and not as string for better performance - short table of test cases (TOC) is added in HTML log - algorithm to combine test cases in one row in HTML log is improved to avoid long lines (group bugs) Parse rules corrected to ignore irrelevant debug messages, and to correctly report tests 3rdparty export as skipped or BAD when Gl2Ps is missing or is built in incompatible mode on windows Tests corrected to pass in Debug mode on Windows
72 lines
1.6 KiB
Plaintext
Executable File
72 lines
1.6 KiB
Plaintext
Executable File
puts "================"
|
|
puts "OCC1786"
|
|
puts "OCC2707"
|
|
puts "================"
|
|
#######################################################################################
|
|
# AIS_LC::AddOrRemoveSelected(Handle(SelectMgr_EntityOwner), ..) works too slow
|
|
#######################################################################################
|
|
|
|
box b1 10 10 10
|
|
box b2 20 20 20 10 10 10
|
|
vinit
|
|
vdisplay b1 b2
|
|
vfit
|
|
|
|
# box b1
|
|
set x11 57 ; set y11 322
|
|
set x12 118 ; set y12 322
|
|
|
|
# box b2
|
|
set x21 290 ; set y21 186
|
|
set x22 352 ; set y22 186
|
|
|
|
set Selection_R 0.8
|
|
set Selection_G 0.8
|
|
set Selection_B 0.8
|
|
|
|
set Idle_R 1
|
|
set Idle_G 1
|
|
set Idle_B 0
|
|
|
|
#QASetChoiceMode EDGE ON
|
|
vselmode 2 1
|
|
set AutoHilight 0
|
|
OCC1786 ${AutoHilight}
|
|
set BeforeNbSelected [vnbselected]
|
|
|
|
checkcolor ${x12} ${y12} ${Idle_R} ${Idle_G} ${Idle_B}
|
|
checkcolor ${x21} ${y21} ${Idle_R} ${Idle_G} ${Idle_B}
|
|
checkcolor ${x22} ${y22} ${Idle_R} ${Idle_G} ${Idle_B}
|
|
|
|
if {${BeforeNbSelected} == 0} {
|
|
puts "OCC1786: OK (case 4: before selection)"
|
|
} else {
|
|
puts "OCC1786: Error (case 4: before selection)"
|
|
}
|
|
|
|
# Select edges
|
|
|
|
vselect 0 0 1
|
|
|
|
vselect ${x11} ${y11} 1
|
|
vselect ${x12} ${y12} 1
|
|
|
|
vselect ${x21} ${y21} 1
|
|
vselect ${x22} ${y22} 1
|
|
|
|
vselect 0 0 1
|
|
set AfterNbSelected [vnbselected]
|
|
|
|
checkcolor ${x11} ${y11} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
checkcolor ${x12} ${y12} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
checkcolor ${x21} ${y21} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
checkcolor ${x22} ${y22} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
|
|
if {${AfterNbSelected} == 4} {
|
|
puts "OCC1786: OK (case 9: after selection)"
|
|
} else {
|
|
puts "OCC1786: Error (case 9: after selection)"
|
|
}
|
|
|
|
set only_screen 1
|