1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-07-20 12:45:50 +03:00
occt/tests/bugs/caf/bug24565
szy 0d3bd50c5f 0024565: MgtBRep persistence bug
Fix of the persistence bug (exception with message "Persistant CurveRep is Null").
Creating new draw command for testing CR24565
Revert license header corruption
Correction for new draw command OCC24565
Test case for issue CR24565
2014-04-04 08:53:41 +04:00

26 lines
552 B
Plaintext

puts "=========="
puts "OCC24565"
puts "=========="
puts ""
###################################################
# MgtBRep persistence bug
###################################################
pload QAcommands
set igs_file [locate_data_file bug24565_N60E.igs]
set output_file ${imagedir}/bug24565_output.stor
catch { file delete ${output_file} }
dlog reset
dlog on
OCC24565 ${igs_file} ${output_file}
set info [dlog get]
if { [regexp "Exception" ${info} ] != 1 } {
puts "OK : persistence is good"
} else {
puts "Error : persistence is bad"
}