Lines Matching refs:channels

2     proc __consume_subscribe_messages {client type channels} {
6         for {set i [llength $channels]} {$i > 0} {incr i -1} {
13             set idx [lsearch -exact $channels [lindex $msg 1]]
19             set channels [lreplace $channels $idx $idx]
26         assert {[llength $channels] == 0}
30     proc subscribe {client channels} {
31         $client subscribe {*}$channels
32         __consume_subscribe_messages $client subscribe $channels
35     proc unsubscribe {client {channels {}}} {
36         $client unsubscribe {*}$channels
37         __consume_subscribe_messages $client unsubscribe $channels
40     proc psubscribe {client channels} {
41         $client psubscribe {*}$channels
42         __consume_subscribe_messages $client psubscribe $channels
45     proc punsubscribe {client {channels {}}} {
46         $client punsubscribe {*}$channels
47         __consume_subscribe_messages $client punsubscribe $channels