[occt.git] / tests / bugs / moddata / bug325

puts "========================"
puts " OCC325 "
puts "========================"
puts ""
##################################################
## Checkshape does not recognize an error in a bad face
##################################################

restore [locate_data_file OCC325.brep] result

decho off
set che [checkshape result]
decho on

if { [regexp {Faulty} $che ] != 1} {
    puts "Faulty OCC325: Checkshape command works wrongly"
} else {
    puts "OCC325 OK : Checkshape command works properly"
}

set 2dviewer 0
Commit	Line	Data
a87752f3	1	puts "========================"
	2	puts " OCC325 "
	3	puts "========================"
	4	puts ""
	5	##################################################
	6	## Checkshape does not recognize an error in a bad face
	7	##################################################
	8
	9	restore [locate_data_file OCC325.brep] result
	10
	11	decho off
	12	set che [checkshape result]
	13	decho on
	14
	15	if { [regexp {Faulty} $che ] != 1} {
	16	puts "Faulty OCC325: Checkshape command works wrongly"
	17	} else {
	18	puts "OCC325 OK : Checkshape command works properly"
	19	}
	20
	21	set 2dviewer 0