130 proc ::redis::__method__write {id fd buf} {  argument
131     ::redis::redis_write $fd $buf
159 proc ::redis::redis_write {fd buf} {  argument
160     puts -nonewline $fd $buf
163 proc ::redis::redis_writenl {fd buf} {  argument
164     redis_write $fd $buf
170     set buf [read $fd $len]
172     return $buf
178     set buf [redis_readnl $fd $count]
179     return $buf
221     set ::redis::state($id) [dict create buf {} mbulk -1 bulk -1 reply {}]
252                     dict set ::redis::state($id) buf "\r\n"
270         set buflen [string length [dict get $::redis::state($id) buf]]
274         dict append ::redis::state($id) buf $data
276         if {[string length [dict get $::redis::state($id) buf]] ==
280                     [string range [dict get $::redis::state($id) buf] 0 end-2]
283                     lappend reply [string range $buf 0 end-2]