Searched refs:nentries (Results 151 - 175 of 446) sorted by relevance

1234567891011>>

/asuswrt-rt-n18u-9.0.0.4.380.2695/release/src/router/db-4.8.30/test/
H A Dtest094.tcl14 proc test094 { method {nentries 10000} {ndups 10} {tnum "094"} args} {
53 if { $nentries == 10000 } {
54 set nentries 100
56 reduce_dups nentries ndups
60 puts "Test$tnum: $method ($args) $nentries \
74 puts "\tTest$tnum.a: $nentries put/get duplicates loop"
81 while { [gets $did str] != -1 && $count < $nentries } {
147 if { [llength $file_list] > $nentries } {
148 set file_list [lrange $file_list 1 $nentries]
H A Drecd020.tcl18 set nentries 10
47 for { set i 1 } { $i <= $nentries } { incr i } {
68 for { set i 1 } { $i <= $nentries } { incr i } {
H A Dtest011.tcl20 proc test011 { method {nentries 10000} {ndups 5} {tnum "011"} args } {
38 test011_recno $method $nentries $tnum $args
70 if { $nentries == 10000 } {
71 set nentries 100
73 reduce_dups nentries ndups
78 puts -nonewline "Test$tnum: $method $nentries small $ndups dup "
107 while { [gets $did str] != -1 && $count < $nentries } {
173 filehead $nentries $dict $t3
208 add_dup $db $txn $nentries "-keyfirst" 0 0
221 add_dup $db $txn $nentries "
[all...]
H A Dndbm.tcl13 proc ndbm { { nentries 1000 } } {
16 puts "NDBM interfaces test: $nentries"
38 while { [gets $did str] != -1 && $count < $nentries } {
69 incr nentries 1
75 filehead $nentries $dict $t3
H A Dsdb005.tcl15 proc sdb005 {method {nentries 100} args } {
45 if { $nentries == 100 } {
46 set nentries 20
57 $testfile [list $method] $psize $duplist $nentries $args
H A Dsdb019.tcl13 proc sdb019 { method { nentries 100 } args } {
83 for { set i 1 } { $i <= $nentries } { incr i } {
96 for { set i 1 } { $i <= $nentries } { incr i } {
121 for { set i 1 } { $i <= $nentries } { incr i } {
H A Dtest021.tcl15 proc test021 { method {nentries 10000} args } {
41 if { $nentries == 10000 } {
42 set nentries 100
47 puts "Test021: $method ($args) $nentries equal key/data pairs"
72 while { [gets $did str] != -1 && $count < $nentries } {
/asuswrt-rt-n18u-9.0.0.4.380.2695/release/src-rt/router/db-4.8.30/test/
H A Dsdb013.tcl13 proc sdb013 { method { nentries 10 } args } {
72 set ret [sdb013_populate $sdb $method $nentries]
83 set entries [expr $nentries * 100]
116 set ret [sdb013_populate $sdb $method $nentries]
132 set entries [expr $nentries * 100]
156 proc sdb013_populate { db method nentries } {
161 while { [gets $did str] != -1 && $count < $nentries } {
H A Dsi004.tcl11 proc si004 { methods {nentries 200} {tnum "004"} args } {
16 if { $nentries > 1000 } {
71 puts "si$tnum \{\[ list $pmethod $methods \]\} $nentries"
88 { [gets $did str] != -1 && $n < $nentries } { incr n } {
126 check_secondaries $pdb $sdbs $nentries keys data "Si$tnum.a"
141 check_secondaries $pdb $sdbs $nentries keys data "Si$tnum.b"
178 $pdb $sdbs $nentries keys data "Si$tnum.c"
184 set half [expr $nentries / 2]
H A Dtest006.tcl16 proc test006 { method {nentries 10000} {reopen 0} {tnum "006"} \
19 test006_body $method $nentries $reopen $tnum 1 "" "" $args
25 test006_body $method $nentries $reopen \
31 proc test006_body { method {nentries 10000} {reopen 0} {tnum "006"} \
72 if { $nentries == 10000 } {
73 set nentries 100
79 puts -nonewline "$nentries equal small key; medium data pairs"
105 while { [gets $did str] != -1 && $count < $nentries } {
H A Dtest016.tcl18 proc test016 { method {nentries 10000} args } {
54 if { $nentries == 10000 } {
55 set nentries 100
60 puts "Test016: $method ($args) $nentries partial put shorten"
82 while { [gets $did str] != -1 && $count < $nentries } {
113 while { [gets $did str] != -1 && $count < $nentries } {
161 for {set i 1} {$i <= $nentries} {set i [incr i]} {
168 filehead $nentries $dict $t3
H A Dtest036.tcl9 # TEST Put nentries key/data pairs (from the dictionary) using a cursor
12 proc test036 { method {nentries 10000} args } {
42 if { $nentries == 10000 } {
43 set nentries 100
49 puts "Test036: $method ($args) $nentries equal key/data pairs"
79 while { [gets $did str] != -1 && $count < $nentries } {
108 while { [gets $did str] != -1 && $count < $nentries } {
147 for {set i 1} {$i <= $nentries} {set i [incr i]} {
154 filehead $nentries $dict $t3
H A Dtest094.tcl14 proc test094 { method {nentries 10000} {ndups 10} {tnum "094"} args} {
53 if { $nentries == 10000 } {
54 set nentries 100
56 reduce_dups nentries ndups
60 puts "Test$tnum: $method ($args) $nentries \
74 puts "\tTest$tnum.a: $nentries put/get duplicates loop"
81 while { [gets $did str] != -1 && $count < $nentries } {
147 if { [llength $file_list] > $nentries } {
148 set file_list [lrange $file_list 1 $nentries]
H A Drecd020.tcl18 set nentries 10
47 for { set i 1 } { $i <= $nentries } { incr i } {
68 for { set i 1 } { $i <= $nentries } { incr i } {
H A Dtest011.tcl20 proc test011 { method {nentries 10000} {ndups 5} {tnum "011"} args } {
38 test011_recno $method $nentries $tnum $args
70 if { $nentries == 10000 } {
71 set nentries 100
73 reduce_dups nentries ndups
78 puts -nonewline "Test$tnum: $method $nentries small $ndups dup "
107 while { [gets $did str] != -1 && $count < $nentries } {
173 filehead $nentries $dict $t3
208 add_dup $db $txn $nentries "-keyfirst" 0 0
221 add_dup $db $txn $nentries "
[all...]
H A Dndbm.tcl13 proc ndbm { { nentries 1000 } } {
16 puts "NDBM interfaces test: $nentries"
38 while { [gets $did str] != -1 && $count < $nentries } {
69 incr nentries 1
75 filehead $nentries $dict $t3
H A Dsdb005.tcl15 proc sdb005 {method {nentries 100} args } {
45 if { $nentries == 100 } {
46 set nentries 20
57 $testfile [list $method] $psize $duplist $nentries $args
/asuswrt-rt-n18u-9.0.0.4.380.2695/release/src-rt-6.x.4708/router/db-4.8.30/test/
H A Dsdb013.tcl13 proc sdb013 { method { nentries 10 } args } {
72 set ret [sdb013_populate $sdb $method $nentries]
83 set entries [expr $nentries * 100]
116 set ret [sdb013_populate $sdb $method $nentries]
132 set entries [expr $nentries * 100]
156 proc sdb013_populate { db method nentries } {
161 while { [gets $did str] != -1 && $count < $nentries } {
H A Dsi004.tcl11 proc si004 { methods {nentries 200} {tnum "004"} args } {
16 if { $nentries > 1000 } {
71 puts "si$tnum \{\[ list $pmethod $methods \]\} $nentries"
88 { [gets $did str] != -1 && $n < $nentries } { incr n } {
126 check_secondaries $pdb $sdbs $nentries keys data "Si$tnum.a"
141 check_secondaries $pdb $sdbs $nentries keys data "Si$tnum.b"
178 $pdb $sdbs $nentries keys data "Si$tnum.c"
184 set half [expr $nentries / 2]
H A Dtest006.tcl16 proc test006 { method {nentries 10000} {reopen 0} {tnum "006"} \
19 test006_body $method $nentries $reopen $tnum 1 "" "" $args
25 test006_body $method $nentries $reopen \
31 proc test006_body { method {nentries 10000} {reopen 0} {tnum "006"} \
72 if { $nentries == 10000 } {
73 set nentries 100
79 puts -nonewline "$nentries equal small key; medium data pairs"
105 while { [gets $did str] != -1 && $count < $nentries } {
H A Dtest016.tcl18 proc test016 { method {nentries 10000} args } {
54 if { $nentries == 10000 } {
55 set nentries 100
60 puts "Test016: $method ($args) $nentries partial put shorten"
82 while { [gets $did str] != -1 && $count < $nentries } {
113 while { [gets $did str] != -1 && $count < $nentries } {
161 for {set i 1} {$i <= $nentries} {set i [incr i]} {
168 filehead $nentries $dict $t3
H A Dtest036.tcl9 # TEST Put nentries key/data pairs (from the dictionary) using a cursor
12 proc test036 { method {nentries 10000} args } {
42 if { $nentries == 10000 } {
43 set nentries 100
49 puts "Test036: $method ($args) $nentries equal key/data pairs"
79 while { [gets $did str] != -1 && $count < $nentries } {
108 while { [gets $did str] != -1 && $count < $nentries } {
147 for {set i 1} {$i <= $nentries} {set i [incr i]} {
154 filehead $nentries $dict $t3
H A Dtest094.tcl14 proc test094 { method {nentries 10000} {ndups 10} {tnum "094"} args} {
53 if { $nentries == 10000 } {
54 set nentries 100
56 reduce_dups nentries ndups
60 puts "Test$tnum: $method ($args) $nentries \
74 puts "\tTest$tnum.a: $nentries put/get duplicates loop"
81 while { [gets $did str] != -1 && $count < $nentries } {
147 if { [llength $file_list] > $nentries } {
148 set file_list [lrange $file_list 1 $nentries]
H A Drecd020.tcl18 set nentries 10
47 for { set i 1 } { $i <= $nentries } { incr i } {
68 for { set i 1 } { $i <= $nentries } { incr i } {
H A Dtest011.tcl20 proc test011 { method {nentries 10000} {ndups 5} {tnum "011"} args } {
38 test011_recno $method $nentries $tnum $args
70 if { $nentries == 10000 } {
71 set nentries 100
73 reduce_dups nentries ndups
78 puts -nonewline "Test$tnum: $method $nentries small $ndups dup "
107 while { [gets $did str] != -1 && $count < $nentries } {
173 filehead $nentries $dict $t3
208 add_dup $db $txn $nentries "-keyfirst" 0 0
221 add_dup $db $txn $nentries "
[all...]

Completed in 127 milliseconds

1234567891011>>