[occt.git] / tests / bugs / modalg / bug6063

puts "============"
puts "OCC6063"
puts "============"
puts ""
######################################################
# Exception is raised during command "sprops" in DRAW on attached shape.
######################################################

set BugNumber OCC6063
cpulimit 2000

restore [locate_data_file OCC6063-2.brep] result

decho off
set che_res [checkshape result]
decho on
if { [regexp {Faulty} $che_res] } {
   puts "Faulty ${BugNumber} : checkshape is wrong for res"
}

set tol_square 1.e-6
set square 2465.96
set 2dviewer 0
Commit	Line	Data
61c421bf	1	puts "============"
	2	puts "OCC6063"
	3	puts "============"
	4	puts ""
	5	######################################################
	6	# Exception is raised during command "sprops" in DRAW on attached shape.
	7	######################################################
	8
	9	set BugNumber OCC6063
	10	cpulimit 2000
	11
	12	restore [locate_data_file OCC6063-2.brep] result
	13
	14	decho off
	15	set che_res [checkshape result]
	16	decho on
	17	if { [regexp {Faulty} $che_res] } {
	18	puts "Faulty ${BugNumber} : checkshape is wrong for res"
	19	}
	20
	21	set tol_square 1.e-6
	22	set square 2465.96
	23	set 2dviewer 0
	24