Source position: tcl80.pp line 800
function Tcl_GetVar(
interp: PTcl_Interp;
varName: PChar;
flags: Integer
):PChar;