Source position: tcl80.pp line 804
function Tcl_SetVar(
interp: PTcl_Interp;
varName: PAnsiChar;
newValue: PAnsiChar;
flags: Integer
):PAnsiChar;