1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-07-30 13:05:50 +03:00
occt/tests/bugs/modalg_6/bug26616

18 lines
475 B
Plaintext

puts "========"
puts "OCC26616"
puts "========"
puts ""
############################################
# Memory leak in IntTools_Context::Hatcher
############################################
restore [locate_data_file OCC26635_t0.brep] t0
restore [locate_data_file OCC26635_t1.brep] t1
bfuse res t0 t1
set m0 [meminfo w]
repeat 10 {bfuse res t0 t1}
set m1 [meminfo w]
if {[expr {$m1 - $m0}] > 1572864} {
puts "ERROR: OCC26616 is reproduced. Memory leak has been detected."
}