[occt.git] / tests / bugs / modalg_6 / bug26016

puts "========"
puts "OCC26016"
puts "========"
puts ""
##@@###########################
# BRepPrimAPI_MakeRevol crash
###############################

smallview

restore [locate_data_file OCC26016-revolve-crash.brep] a
revol r a 0 0 0 0 1 0 90
set bug_info [checkshape r]

if {[string compare $bug_info "This shape seems to be valid"] != 0} {
  puts "ERROR: OCC26016 is reproduced"
}

donly r
fit
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
24e40cc2	1	puts "========"
	2	puts "OCC26016"
	3	puts "========"
	4	puts ""
	5	##@@###########################
	6	# BRepPrimAPI_MakeRevol crash
	7	###############################
	8
	9	smallview
	10
	11	restore [locate_data_file OCC26016-revolve-crash.brep] a
	12	revol r a 0 0 0 0 1 0 90
	13	set bug_info [checkshape r]
	14
	15	if {[string compare $bug_info "This shape seems to be valid"] != 0} {
	16	puts "ERROR: OCC26016 is reproduced"
	17	}
	18
	19	donly r
	20	fit
5747059b	21	checkview -screenshot -2d -path ${imagedir}/${test_image}.png