5 #######################################################################
6 # NCollection_Vector works incorrectly with rare data
7 #######################################################################
12 set List [OCC7639 0 1 2 500 1 2]
14 set Length [llength $List]
15 if { ${Length} != 6} {
16 puts "Faulty (1) ${BugNumber}"
18 if { [regexp "1" $List] != 1 } {
19 puts "Faulty (2) ${BugNumber}"
21 if { [regexp "2" $List] != 1 } {
22 puts "Faulty (3) ${BugNumber}"
24 if { [regexp "500" $List] != 1 } {
25 puts "Faulty (4) ${BugNumber}"