Source position: tcl80.pp line 905
function Tcl_UnregisterChannel(
interp: PTcl_Interp;
channel: PTcl_Channel
):Integer;