#55 rechan/memchan incompatibility causes error

[Stephen Huntley]

The attached starkit mounts a virtual filesystem that makes use of memchans to handle virtual file I/O.

At the end of the "main.tcl" script is test code that opens a virtual file for writing and writes to it.

When the starkit is run using the "source" command in a tclsh interpreter, it runs fine. When tclkitsh is used to run it, an error is thrown when the virtual file is written to:

C:/Program Files/myinstall/applications/FILTR4.5/FILTR4.5.kit: invalid command name "::vfs::mk4::Unmount mk4vfs1"
C:/Program Files/myinstall/languages/Tcl/external/tclkitsh-8.4.16.exe: can't read "::vfs::_unmountCmd(C:/Program Files/myinstall/languages/Tcl/external/tclkitsh-8.4.16.exe)": no such element in array
error writing "rechan33": bad file number
while executing
"puts $f $bc"
(file "C:/Program Files/myinstall/applications/FILTR4.5/FILTR4.5.kit/main.tcl" line 39)
invoked from within
"source {C:/Program Files/myinstall/applications/FILTR4.5/FILTR4.5.kit/main.tcl}"
("uplevel" body line 1)
invoked from within
"uplevel [list source [file join $self main.tcl]]"

[Stephen Huntley]

rechan_bug.kit