[occt.git] / tests / bugs / vis / bug16950_1

puts "==========="
puts "OCC16950"
puts "==========="
######################################################
# OCC Visualization fails to display empty nested compounds
######################################################

set BugNumber OCC16950

puts "Make compound containing another (empty) one"
compound c
compound c result

puts "And display it"
vinit
vdisplay result

# Resume
if [catch { vsetdispmode 1 } res] {
   puts "Faulty ${BugNumber}"
} else {
   puts "OK ${BugNumber}"
}
Commit	Line	Data
3bea4c16	1	puts "==========="
	2	puts "OCC16950"
	3	puts "==========="
	4	######################################################
	5	# OCC Visualization fails to display empty nested compounds
	6	######################################################
	7
	8	set BugNumber OCC16950
	9
	10	puts "Make compound containing another (empty) one"
	11	compound c
	12	compound c result
	13
	14	puts "And display it"
	15	vinit
	16	vdisplay result
	17
	18	# Resume
	19	if [catch { vsetdispmode 1 } res] {
	20	puts "Faulty ${BugNumber}"
	21	} else {
	22	puts "OK ${BugNumber}"
	23	}
	24
	25