Lines Matching refs:dlen
10 # TEST 1. Test partial puts where dlen != size (should fail)
78 # Test partial puts where dlen != size (should fail)
80 # dlen and size in fixed length recno/queue
94 puts "\tTest051.b: Partial puts with dlen != size."
95 foreach dlen { 1 16 20 32 } {
97 # dlen < size
98 puts "\t\tTest051.e: dlen: $dlen, doff: $doff, \
99 size: [expr $dlen+1]"
100 set data [repeat $test_char [expr $dlen + 1]]
103 [list $doff $dlen]} $txn {$key $data}} ret]
108 error_check_good "dbput:partial: dlen < size" \
112 error_check_good "dbput:partial: dlen < size" \
116 # dlen > size
117 puts "\t\tTest051.e: dlen: $dlen, doff: $doff, \
118 size: [expr $dlen-1]"
119 set data [repeat $test_char [expr $dlen - 1]]
122 [list $doff $dlen]} $txn {$key $data}} ret]
124 error_check_good "dbput:partial: dlen > size" \
128 error_check_good "dbput:partial: dlen < size" \
169 set dlen [string length $pdata]
176 set offlist [list 0 $mid [expr $ilen -1] [expr $fixed_len - $dlen]]
189 set ret [eval {$db put -partial [list $doff $dlen]} $txn \
198 set end [string range $data $dlen $ilen]
201 set end [string range $data [expr $doff + $dlen] $ilen]
210 format a[set nlen]x[set diff]a$dlen $newdata $pdata]