[occt.git] / tests / bugs / step / bug348_1

puts "TODO OCC12345 ALL: Error on Record"

puts "========"
puts "OCC205"
puts "OCC348"
puts "BUC61003"
puts "========"
######################################
## puts "Crash on importing STEP file"
## CS_CONROD.stp
######################################

vinit
stepread [locate_data_file BUC61003-1.stp] a *

tpcompound result
checkshape result

vdisplay result
vsetdispmode 1
vfit

set info [trinfo result]
regexp { +([-0-9.+eE]+) +triangles} $info full tri
regexp { +([-0-9.+eE]+) +nodes} $info full nod

if { $tri == 0 || $nod == 0 } {
   puts "Error : here is shading problem"
}

set 2dviewer 0
Commit	Line	Data
0e94a94e	1	puts "TODO OCC12345 ALL: Error on Record"
	2
	3	puts "========"
	4	puts "OCC205"
	5	puts "OCC348"
	6	puts "BUC61003"
	7	puts "========"
	8	######################################
	9	## puts "Crash on importing STEP file"
	10	## CS_CONROD.stp
	11	######################################
	12
	13	vinit
	14	stepread [locate_data_file BUC61003-1.stp] a *
	15
	16	tpcompound result
352ffd73	17	checkshape result
0e94a94e	18
	19	vdisplay result
	20	vsetdispmode 1
	21	vfit
	22
	23	set info [trinfo result]
	24	regexp { +([-0-9.+eE]+) +triangles} $info full tri
	25	regexp { +([-0-9.+eE]+) +nodes} $info full nod
	26
	27	if { $tri == 0 \|\| $nod == 0 } {
	28	puts "Error : here is shading problem"
	29	}
	30
	31	set 2dviewer 0
	32