[occt.git] / tests / bugs / modalg_7 / bug25104

puts "========"
puts "OCC25104"
puts "========"
puts ""
##########################################################
# 0025104: Prism from BSpline curve can not be chamfered
##########################################################

restore [locate_data_file bug25104_whale2-draw-path.brep] path

prism Extrude001 path 0. 0. 5.

set bug_info [string trim [bopcheck Extrude001]]
if {$bug_info != "This shape seems to be OK."} {
  puts "ERROR: OCC25104 is reproduced. Prism has been created with errors."
}
Commit	Line	Data
dfdfa61f	1	puts "========"
	2	puts "OCC25104"
	3	puts "========"
	4	puts ""
	5	##########################################################
	6	# 0025104: Prism from BSpline curve can not be chamfered
	7	##########################################################
	8
	9	restore [locate_data_file bug25104_whale2-draw-path.brep] path
	10
	11	prism Extrude001 path 0. 0. 5.
	12
	13	set bug_info [string trim [bopcheck Extrude001]]
	14	if {$bug_info != "This shape seems to be OK."} {
	15	puts "ERROR: OCC25104 is reproduced. Prism has been created with errors."
	16	}