[occt.git] / tests / bugs / modalg_5 / bug25509_8

puts "============"
puts "OCC25509"
puts "============"
puts ""
######################################################
# Wrong shape considered as valid by checkshape
######################################################

restore [locate_data_file bug25509_r_6.brep] result

decho off
set info [checkshape result]
decho on

if { [regexp "Faulty shapes in variables faulty_1" ${info}] != 1 } {
   puts "Error : There are no mistakes by checkshape-command"
} else {
   puts "OK : There are mistakes by checkshape-command"
}

set 2dviewer 1
Commit	Line	Data
949df2b6	1	puts "============"
	2	puts "OCC25509"
	3	puts "============"
	4	puts ""
	5	######################################################
	6	# Wrong shape considered as valid by checkshape
	7	######################################################
	8
	9	restore [locate_data_file bug25509_r_6.brep] result
	10
	11	decho off
	12	set info [checkshape result]
	13	decho on
	14
	15	if { [regexp "Faulty shapes in variables faulty_1" ${info}] != 1 } {
	16	puts "Error : There are no mistakes by checkshape-command"
	17	} else {
	18	puts "OK : There are mistakes by checkshape-command"
	19	}
	20
	21	set 2dviewer 1