mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
0d828ac838
Removed testgrids 'bugs/vis' and '3rdparty'; tests have been redistributed across other grids. Moved testgrid 'v3d/ivtk' into dedicated 'vtk/ivtk'. Added testgrid 'vselect' dedicated to 3D viewer picking/selection functionality and filled with tests from 'v3d/vertex', 'v3d/face' and similar groups. Added testgrid 'opengl' dedicated to OpenGL driver low-level functionality (GLSL programs and similar) and filled with tests from 'v3d/glsl', 'v3d/raytrace', '3rdparty/fonts', 'bugs/vis' (portion) and similar. Added testgrid 'opengles3' dedicated to OpenGL ES 3.0 driver low-level functionality and reusing tests from 'opengl' testgrid. Subgroup 'opengles3/raytrace' is disabled on Windows, as Ray-Tracing currently requires OpenGL ES 3.2. while ANGLE library implements only OpenGL ES 3.0. Added testgrid 'opengles2' dedicated to OpenGL ES 2.0 driver low-level functionality and reusing a limited subset of passing tests from 'opengl' testgrid. Currently testgrid is activated only on Windows platform when using ANGLE library (properietary OpenGL ES drivers do not allow creation of restricted 2.0 context). Test cases have been cleaned out to put bug description into log, to properly load necessary plugins and to explicitly dump viewer.
51 lines
1.4 KiB
Plaintext
51 lines
1.4 KiB
Plaintext
puts "============"
|
|
puts "OCC25532: Visualization - fix cross-references between AIS_ConnectedInteractive and connected presentation"
|
|
puts "============"
|
|
puts ""
|
|
|
|
pload MODELING VISUALIZATION
|
|
pload OPENGL
|
|
psphere s 0.5
|
|
tclean s
|
|
incmesh s 0.001
|
|
trinfo s
|
|
|
|
vclear
|
|
vinit View1
|
|
vaxo
|
|
vcaps -vbo 0
|
|
vsetdispmode 1
|
|
vdefaults -absDefl 1.0
|
|
vselprops -autoactivate 0
|
|
|
|
set aMemInit [meminfo h]
|
|
set aNb 1000
|
|
|
|
# display as copies
|
|
eval compound [lrepeat $aNb s] ss
|
|
explode ss
|
|
for {set i 1} {$i <= $aNb} {incr i} { vdisplay -noupdate ss_${i}; vsetlocation -noupdate ss_${i} ${i} 0 0 }
|
|
vfit
|
|
set aMemDisp1 [meminfo h]
|
|
vclear
|
|
set aMemClear1 [meminfo h]
|
|
|
|
# display as connected instances of single presentation
|
|
vconnectto i_1 0 0 0 s
|
|
for {set i 2} {$i < $aNb} {incr i} { vconnectto i_${i} ${i} 0 0 i_1 }
|
|
set aMemDisp2 [meminfo h]
|
|
vclear
|
|
set aMemClear2 [meminfo h]
|
|
|
|
puts "Initial memory: [expr $aMemInit / (1024 * 1024)] MiB"
|
|
puts "Displaying (simple): [expr $aMemDisp1 / (1024 * 1024)] MiB"
|
|
puts "Clearing (simple): [expr $aMemClear1 / (1024 * 1024)] MiB"
|
|
puts "Displaying (connected): [expr $aMemDisp2 / (1024 * 1024)] MiB"
|
|
puts "Clearing (connected): [expr $aMemClear2 / (1024 * 1024)] MiB"
|
|
|
|
set aRatio [expr $aMemClear2 / double($aMemClear1)]
|
|
|
|
# check if the memory difference is greater than 20%
|
|
if [expr $aRatio > 1.2] { puts "Error : TEST FAILED" }
|
|
vdump ${imagedir}/${casename}.png
|