Source position: tcl80.pp line 907
procedure Tcl_CreateChannelHandler(
chan: PTcl_Channel;
mask: Integer;
proc: TTclChannelProc;
clientData: Tcl_ClientData
);