[occt.git] / tests / sewing / begin

# To prevent loops limit to 5 minutes
cpulimit 300

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

if { [info exists imagedir] == 0 } {
   set imagedir .
}

if { [info exists test_image ] == 0 } {
   set test_image photo
}

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