Source position: tcl80.pp line 794
function Tcl_TraceVar2(
interp: PTcl_Interp;
varName: PChar;
elemName: PChar;
flags: Integer;
proc: TTclVarTraceProc;
clientData: Tcl_ClientData
):Integer;