Lines Matching refs:curr
141 for { set j $i; set curr [$dbc get -first]} { $j < $npages} { \
142 incr j; set curr [$dbc get -next]} {
143 error_check_bad dbc:get:next [llength $curr] 0
145 [lindex [lindex $curr 0] 0] $key_set($j)00
148 for { set j [expr $npages - 1]; set curr [$dbc get -last]} { \
150 set j [incr j -1]; set curr [$dbc get -prev]} {
151 error_check_bad dbc:get:prev [llength $curr] 0
153 [lindex [lindex $curr 0] 0] $key_set($j)00
161 set curr [eval {$db get} $txn {-recno $j}]
163 db_get:recno:$j [llength $curr] 0
165 [lindex [lindex $curr 0] 0] \
190 for { set j 0; set curr [$dbc get -first]} { $j <= $i} {\
191 incr j; set curr [$dbc get -next]} {
192 error_check_bad dbc:get:next [llength $curr] 0
194 [lindex [lindex $curr 0] 0] $key_set($j)00
196 error_check_good dbc:get:next [llength $curr] 0
199 for { set j $i; set curr [$dbc get -last]} { \
201 set j [incr j -1]; set curr [$dbc get -prev]} {
202 error_check_bad dbc:get:prev [llength $curr] 0
204 [lindex [lindex $curr 0] 0] $key_set($j)00
207 error_check_good dbc:get:prev [llength $curr] 0
213 set curr [eval {$db get} $txn {-recno $j}]
215 db_get:recno:$j [llength $curr] 0
217 [lindex [lindex $curr 0] 0] \