projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
0024326: Get rid of confusing extension line
[occt.git]
/
tests
/
bugs
/
vis
/
bug172
1
puts "========"
2
puts "OCC172"
3
puts "========"
4
5
pload XDE
6
7
vinit
8
restore [locate_data_file OCC162.brep] s
9
vdisplay s
10
11
set listmem {}
12
set i_max 10
13
for {set i 1} {${i} <= ${i_max}} {incr i} {
14
# select shape
15
OCC172
16
# deselect shape
17
OCC172
18
19
lappend listmem [meminfo h]
20
if { [checktrend $listmem 0 1 "Memory leak detected"] } {
21
puts "No memory leak, $i iterations"
22
break
23
}
24
}
25
26