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

puts "============"
puts "CR26430"
puts "============"
puts ""

##########################################################################################
puts "Visualization - segmentation fault in opened local context"
##########################################################################################

pload MODELING VISUALIZATION

restore [locate_data_file bug26430.brep] aShape

vinit View1
vdisplay aShape
vfit
vsetdispmode aShape 1

vselmode aShape 1 1
vselmode aShape 2 1
vselmode aShape 3 1
vselmode aShape 4 1
vselmode aShape 5 1

# check selection for all problematic cases
vselect 125 155
set aNbSelected [vnbselected]
if {$aNbSelected != 1} {
  puts "ERROR: Vertex was not selected!"
}

vselect 0 0
vselect 121 155 130 160
set aNbSelected [vnbselected]
if {$aNbSelected != 1} {
  puts "ERROR: Vertex was not selected!"
}

vselect 0 0
vselect 100 100 200 200
set aNbSelected [vnbselected]
if {$aNbSelected != 14} {
  puts "ERROR: Vertex was not selected!"
}

vdump ${imagedir}/${casename}.png
Commit	Line	Data
72080ae1	1	puts "============"
	2	puts "CR26430"
	3	puts "============"
	4	puts ""
	5
	6	##########################################################################################
	7	puts "Visualization - segmentation fault in opened local context"
	8	##########################################################################################
	9
	10	pload MODELING VISUALIZATION
	11
	12	restore [locate_data_file bug26430.brep] aShape
	13
	14	vinit View1
	15	vdisplay aShape
	16	vfit
	17	vsetdispmode aShape 1
	18
	19	vselmode aShape 1 1
	20	vselmode aShape 2 1
	21	vselmode aShape 3 1
	22	vselmode aShape 4 1
	23	vselmode aShape 5 1
	24
	25	# check selection for all problematic cases
	26	vselect 125 155
	27	set aNbSelected [vnbselected]
	28	if {$aNbSelected != 1} {
	29	puts "ERROR: Vertex was not selected!"
	30	}
	31
	32	vselect 0 0
	33	vselect 121 155 130 160
	34	set aNbSelected [vnbselected]
	35	if {$aNbSelected != 1} {
	36	puts "ERROR: Vertex was not selected!"
	37	}
	38
	39	vselect 0 0
	40	vselect 100 100 200 200
	41	set aNbSelected [vnbselected]
	42	if {$aNbSelected != 14} {
	43	puts "ERROR: Vertex was not selected!"
	44	}
	45
f9f740d6	46	vdump ${imagedir}/${casename}.png