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

18 lines
356 B
Plaintext

if { [array get Draw_Groups "TOPOLOGY Check commands"] == "" } {
pload TOPTEST
}
# To prevent loops limit to 10 minutes
cpulimit 600
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
}