1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
vtn 400933675f 0023087: Upgrade of the OCCT test system
Integration of new occt testing system
2012-07-13 11:42:23 +04:00

21 lines
380 B
Plaintext
Executable File

if { [array get Draw_Groups "TOPOLOGY Check commands"] == "" } {
pload TOPTEST
}
# To prevent loops limit to 5 minutes
cpulimit 300
dset SCALE 100
protect SCALE
if {[string compare [datadir] "."] == 0} {
datadir [file dirname [info script]]/data
}
if { [info exists imagedir] == 0 } {
set imagedir .
}
if { [info exists test_image ] == 0 } {
set test_image photo
}