Source position: tcl80.pp line 768
type TTclClientDataProc = procedure(
clientData: Tcl_ClientData
);