Lines Matching refs:iSlot
127 set iSlot [expr int(rand()*8)]
130 if {[lindex $L($idx) $iSlot]!="n"} {
131 vfs_shmlock db$idx main [lindex $L($idx) $iSlot] unlock $iSlot 1
132 lset L($idx) $iSlot n
136 if {[lindex $L($idx) $iSlot]=="n"} {
140 for {set l $iSlot} {$l<8 && [lindex $L($idx) $l]=="n"} {incr l} {}
141 set n [expr int(rand()*($l-$iSlot))+1]
146 # puts "iSlot=$iSlot l=$l L=$L($idx)"
147 # puts "$iSlot $n"
149 set res [vfs_shmlock db$idx main $locktype lock $iSlot $n]
152 for {set i $iSlot} {$i<($iSlot+$n)} {incr i} {
163 for {set i $iSlot} {$i<($iSlot+$n)} {incr i} {