[occt.git] / tests / pipe / begin

# To prevent loops limit to 10 minutes
cpulimit 600

if { [string compare [datadir] "."] == 0 } {
   datadir [file dirname [info script]]/data
}

if { [array get Draw_Groups "TOPOLOGY Feature commands"] == "" } {
	pload TOPTEST
}

if { [info exists imagedir] == 0 } {
   set imagedir .
}
if { [info exists test_image ] == 0 } {
   set test_image photo
}
Commit	Line	Data
40093367	1	# To prevent loops limit to 10 minutes
	2	cpulimit 600
	3
	4	if { [string compare [datadir] "."] == 0 } {
	5	datadir [file dirname [info script]]/data
	6	}
	7
	8	if { [array get Draw_Groups "TOPOLOGY Feature commands"] == "" } {
	9	pload TOPTEST
	10	}
	11
	12	if { [info exists imagedir] == 0 } {
	13	set imagedir .
	14	}
	15	if { [info exists test_image ] == 0 } {
	16	set test_image photo
	17	}