Lines Matching refs:random_int
98 if { [berkdb random_int 0 1] || [is_queue $method] } {
127 set out [berkdb random_int 1 $noutiter]
149 set nrecs [berkdb random_int 0 3]
255 set in [berkdb random_int 1 $niniter]
257 set op [berkdb random_int 0 2]
272 set n [berkdb random_int 0 [expr $num_open - 1]]
277 set key [berkdb random_int 1000 1999]$keybase
283 if { [berkdb random_int 0 3] == 0 && 0 } {
303 set which [berkdb random_int 0 \
324 if { [berkdb random_int 0 199] == 0 } {
372 set which [berkdb random_int 0 [expr $ndbs - 1]]