Source position: tcl80.pp line 897
procedure Tcl_SetStdChannel(
channel: PTcl_Channel;
typ: Integer
);