[occt.git] / tests / bugs / modalg_2 / bug22986

puts "==========="
puts "OCC22986"
puts "==========="
puts ""
#######################################################################
# Regression with OCCT652 on Windows. DRAWEXE crashes during featprism
#######################################################################

set BugNumber OCC22986

#eval datadir ${CfeDir}/data/900

restore [locate_data_file CFE900_cts21gbs.rle] base 
restore [locate_data_file cts21322_face.rle] wire 

explode base face
copy base_6 fsketch

splitshape result fsketch fsketch wire
if { [llength [explode result f]] != 3 } {
    puts "Faulty ${BugNumber} : The result of splitshape command is incorrect."
} else {
    puts "${BugNumber}  OK"
}

checkprops result -s 414 
checkshape result
checkview -display result -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
809eca9d	1	puts "==========="
	2	puts "OCC22986"
	3	puts "==========="
	4	puts ""
	5	#######################################################################
7b5e532f	6	# Regression with OCCT652 on Windows. DRAWEXE crashes during featprism
809eca9d	7	#######################################################################
	8
	9	set BugNumber OCC22986
	10
	11	#eval datadir ${CfeDir}/data/900
	12
	13	restore [locate_data_file CFE900_cts21gbs.rle] base
	14	restore [locate_data_file cts21322_face.rle] wire
	15
	16	explode base face
	17	copy base_6 fsketch
	18
	19	splitshape result fsketch fsketch wire
	20	if { [llength [explode result f]] != 3 } {
	21	puts "Faulty ${BugNumber} : The result of splitshape command is incorrect."
	22	} else {
	23	puts "${BugNumber} OK"
	24	}
	25
58cf74e0	26	checkprops result -s 414
58cf74e0	27	checkshape result
5747059b	28	checkview -display result -3d -path ${imagedir}/${test_image}.png