'''virtchannel_base''' is a container for many of [Tcllib%|%Tcllib's] the virtual channel packages. ** Bug: Memchan: [[`[fileevent] readable`] ** The following script illustrates a problem with Memchan: it stops generating '''readable''' events too early. The same problem was reported (10 years ago!) for [memchan]. Maybe it needs to be fixed there, too. ====== #! /bin/env tclsh package require tcl::chan::events package require tcl::chan::memchan proc copied {args} { puts $args set ::done 1 } set chan [tcl::chan::memchan] puts -nonewline $chan [string repeat a 50000] seek $chan 0 start set chanout [open zout w] fcopy $chan $chanout -command copied vwait ::done ====== <> memchan | Tcllib