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

puts "==========="
puts "OCC22986"
puts "==========="
puts ""
#######################################################################
# Regression with OCCT652 on Windows. DRAWEXE craches 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"
}

set square 414
set 3dviewer 0
Commit	Line	Data
809eca9d	1	puts "==========="
	2	puts "OCC22986"
	3	puts "==========="
	4	puts ""
	5	#######################################################################
	6	# Regression with OCCT652 on Windows. DRAWEXE craches during featprism
	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
	26	set square 414
	27	set 3dviewer 0