Source position: tcl80.pp line 904
procedure Tcl_RegisterChannel(
interp: PTcl_Interp;
channel: PTcl_Channel
);