[occt.git] / tests / bugs / moddata_3 / bug25202_3

puts "========"
puts "CR25202"
puts "========"
puts ""
#########################################
## Incorrect value of IsClosed flag in shapes produced by some algorithms
#########################################

plane pp 0 0 0 0 0 1
trim pp pp 0 100 0 100
mkface ff pp
prism result ff 0 0 20

set info [whatis result]
if { [regexp {Closed} ${info}] != 1 } {
    puts "OK : value of IsClosed flag is correct"
} else {
    puts "Error : value of IsClosed flag is not correct"
}

set 2dviewer 1
Commit	Line	Data
ab860031	1	puts "========"
	2	puts "CR25202"
	3	puts "========"
	4	puts ""
	5	#########################################
	6	## Incorrect value of IsClosed flag in shapes produced by some algorithms
	7	#########################################
	8
	9	plane pp 0 0 0 0 0 1
	10	trim pp pp 0 100 0 100
	11	mkface ff pp
	12	prism result ff 0 0 20
	13
	14	set info [whatis result]
da72a17c	15	if { [regexp {Closed} ${info}] != 1 } {
ab860031	16	puts "OK : value of IsClosed flag is correct"
	17	} else {
	18	puts "Error : value of IsClosed flag is not correct"
	19	}
	20
	21	set 2dviewer 1