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